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LA VELOCITA' DEL WINCHESTER, 
LA VERSATILITÀ' DEL FLOPPY 


CON LA SICUREZZA 
DI DERNOUUI DOX 


Bernoulli Box: un sistemo rivoluzionario nelle 
memorie di mosso. 

Bernoulli Box: un sistemo composto do cartuc¬ 
ce estremamente affidabili do 5-10-20 milio¬ 
ni di caratteri ciascuno che in dimensioni com¬ 
patte offrono tempi di accesso molto bassi 
(35 ms medio) e uno resistenza agli shock 
sinora impensabile. 

L'estroibilità e l'intercambiabilità delle cartuc¬ 
ce aumentano a dismisura le capacità di me¬ 
moria di mosso e rendono possibile lo scam¬ 
bio di doti tra vari personals (IBM, OLIVETTI, 
APPLE, PHILIPS, 5PERRY, ecc.). 
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Accessori da scrivania. Il menù mela della scrivania del Ma¬ 
cintosh, con la sua calcolatrice, l'orologio e il puzzle, può riser¬ 
vare non poche sorprese anche a chi lo utilizza da molto tem¬ 
po: è disponibile infatti tanto, tantissimo nuovo software. 


Cartoni animati. Con Movie Construction Set è possibile rea¬ 
lizzare dei cortometraggi da professionista da proiettare poi al¬ 
la velocità desiderata, con effetti spettacolari. E’ sufficiente ca¬ 
ricare il programma nell'Apple II e... 


Stampanti. Nuovissime e made in Italy, sono arrivate le stam¬ 
panti Olivetti compatibili Apple, con ambizioni vastissime: diveni¬ 
re le signore del mercato. Presentiamo in anteprima i modelli 
previsti, con le principali prestazioni e tutte le caratteristiche. 


SMAU 1986. Alla vigilia della più importante manifestazione an¬ 
nuale del settore, non si sa ancora nulla delle possibili sorprese 
che la Apple riserva. Oppure qualcosa si può già sospettare? 
Forse i soliti bene informati hanno già scoperto che... 


Guadagnare in Borsa. Tempi d'oro per far fruttare i propri 
denari, questo si sa. E si sa pure che i programmi per pianifica¬ 
re i propri investimenti non mancano. Ma costano anche più di 1 
milione. Investor per Mac e la nuova versione per il II invece... 


Utility. Due assi nella manica per chi si occupa di programma¬ 
zione in Applesoft: un programma che comprime le immagini in al¬ 
ta risoluzione e uno che permette di formattare l'output, control¬ 
lare l'input, gestire il suono di errore, e altro ancora. 


FreeSoftware. In America esiste da un pezzo: è il software li¬ 
bero, che si prende, si usa e si copia, spedendo poi all'autore, 
che lo attende sulla fiducia, il poco denaro richiesto. Applican¬ 
do ve lo dà proprio gratis: al puro costo del dischetto. 


Finestre e icone. Anche sul video dell’Apple II è possibile ora 
gestire il catalog dei programmi con l’amichevole metodo reso 
famoso da Macintosh: finestre e icone, che si spostano, si modi¬ 
ficano e si attivano con un semplice clic. 


Grafica. Una frotta di simpatici squirms, piccoli essermi agitatis¬ 
simi e scodinzolanti, ci fa scoprire nuovi effetti sbalorditivi: l'ani¬ 
mazione abbinata allo spostamento. Si possono realizzare con 
queste routine dei veri e propri cartoons. 


I China. Predire il futuro con le monete? E’ una delle arti più an¬ 
tiche, densa di sapienza e di fascino; inventata tremila anni fa in 
Cina, conserva intatta, in questa versione per Macintosh, la 
multistratificata complessità della versione originale. 
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62 - MacNews 
82 - One-Liners 
98 - Omnis3 
115 - Per chi comincia 
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120 - Applettere 

124 - Disk Service 
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L’EVOLUZIONE CHE GIRA NEL TEMPO 
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Peravere maggiori informazioni e 
l'indirizzo dei rivenditori della Sua 
zona, ci invii il coupon allegato. 
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DURATA 

DI OLTRE 50 MILIONI DI 
PASSAGGI CON TRACCE 
ERROR-FREE AL 100%. 


SICUREZZA 

“OLD SYSTEM” CHE 
GARANTISCE LUNGA 
DURATA ALLA TESTINA 
DEL FLOPPY E Al DATI 
PROGRAMMATI DI 
RIMANERE NEL TEMPO. 
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FreeSoftware: una parola magica che sta a indicare 
software gratuito. Attenzione, gratuito, non rubato. Si 
tratta infatti di software messo a disposizione di tutti 
dagli autori stessi. In America è diffusissimo, grazie 
anche alle numerose associazioni che si preoccupano 
di diffonderlo accontentandosi di rifarsi appena delle 
spese. Per la prima volta, in Italia, Applicando è 
riuscito a importarlo per i suoi lettori. Si tratta per il 
momento di programmi per Macintosh, alcuni 
davvero ottimi, disponibili a 10.000 lire per ogni 
dischetto, nella formula più economica. Proprio il 
prezzo di un dischetto vergine e forse nemmeno di 
quello, se si pensa che sono comprese le spese di 
spedizione. Speriamo presto di poter varare la stessa 
iniziativa anche per l'Apple II. Stiamo attivamente 
lavorando pure su questo fronte. 

Ancora una volta Applicando si è sforzato di andare 
incontro ai suoi lettori, per procurar loro, attraverso il 
giornale e le sue iniziative, stimoli e strumenti adatti 
all'uso sempre più ampio e creativo del personal 
computer. In cambio, un numero sempre maggiore di 
lettori ci segue, ed è questo naturalmente che permette 
di fare una rivista più ricca, più attenta alle esigenze 
del suo pubblico. Naturalmente tutto questo ha un 
prezzo, anche economico: e l'aiuto di tutti per 
diffondere Applicando equivale, mese per mese, a un 
giornale che cresce nell'interesse di chi lo fa, ma, 
soprattutto, di chi lo legge. E in questo senso anche 
sottoscrivere e far sottoscrivere abbonamenti permette 
un risparmio, perché una tiratura più mirata equivale a 
una resa minore: denaro, insomma, che può essere 
speso in nuove iniziative o in nuovi collaboratori. 

E poi, perdere anche un solo numero di Applicando 
può essere davvero un peccato. Meglio evitarlo! 

Stefano Benvenuti 



UNIONE STAMPA 
PERIODICA ITALIANA 
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Schi 


Che programmi 
fa il ministro 

Vive a Bron, una citta¬ 
dina alla periferia di Lio¬ 
ne e ha soltanto 15 anni, 
ma in Francia è già una 
celebrità che fa scorrere 
fiumi di inchiostro con 
le sue imprese. E' Cyril- 
le de V ignemont, ribattez¬ 
zato "il Mozart dell'infor¬ 
matica" o "il ministro ba¬ 
by": i suoi programmi 
vanno a ruba in Europa 
e, soprattutto, negli Stati 
Uniti, ma la sua popolari¬ 
tà ha avuto la sua definiti¬ 
va consacrazione e ha var¬ 
cato i confini francesi il 
15 aprile scorso, quando 
Hervé de Charette, mini¬ 
stro della funzione pub¬ 


blica e della pianificazio¬ 
ne del nuovo governo pre¬ 
sieduto da Jacques Chi- 
rac, lo ha incaricato di 
studiare e programmare il 
futuro dei suoi giovani 
connazionali, di prevede¬ 
re come cambierà la Fran¬ 
cia nel duemila. 

Ma come è arrivato 
Cyrille a questa svolta 
della sua sfolgorante car¬ 
riera? Ha cominciato 
quando aveva 12 anni (e 
in un triennio è diventato 
plurimilionario), ideando 
il suo primo programma 
per Apple IL "Era un pac- 
c hetto di soft ware chiama¬ 
to Caissier e destinato ai 
commercianti che deside¬ 
ravano tenere aggiornata 
la loro contabilità", ricor¬ 


da Cyrille. "Il brevetto se 

10 assicurò un editore, 
per solo mezzo milione 
di lire. In pochi giorni il 
programma andò a ruba e 
ne furono venduti mi¬ 
gliaia di esemplari. Dopo 
Caissier fu la volta di Re- 
member, un'agenda infor¬ 
matica destinata ai diri¬ 
genti d'azienda", continua 

11 giovane neo-consulen¬ 
te governativo. "Per evi¬ 
tare un’altra Waterloo fi- 
nanziariacontattaidiretta- 
mente la Apple, che ap¬ 
provò il progetto e mi 
concesse, a titolo di dirit¬ 
ti d'auore, circa 25 mila 
lire su ogni esemplare 
venduto. E' stata la mia 
fortuna, il colpo che mi 
ha reso ricco". 


Ora Cyrille de Vigne- 
mont lavora soltanto per 
la casa della mela. E, im¬ 
pegni governativi permet¬ 
tendo, ha in cantiere un 
altro programma per Ap¬ 
ple II che, assicura, avrà 

10 stesso travolgente suc¬ 
cesso dei due che lo han¬ 
no preceduto. Ma che per 

11 momento è ancora top 
secret. Perchè Cyrille a- 
spetta di compiere i 18 
anni per mettersi in pro¬ 
prio e fondare una softwa¬ 
re house. "Molte banche 
si sono già fatte avanti 
per finanziare la mia futu¬ 
ra iniziativa", dice, "ma 

10 sto mettendo da parte 

11 denaro necessario per 
autofinanziare la produ¬ 
zione di software". 



Musica nuova: 
farla, e studiarla 

"Per noi musicisti paz¬ 
zi c'è solo il Macintosh: 
l’unico che consente di ri¬ 
produrre a casa propria o- 
gni genere di strumento e 
musica, con in più la 
possibilità di scrivere e 
suonare i propri pezzi." 
Spagnolo di nascita e ita¬ 
liano d’adozione, Anto¬ 
nio Rodriguez, 36 anni, 
è un vulcano d’idee sull'u- 
ti lizzo del computer: 
" l’informatica m usicale 
sta portando una rivolu¬ 
zione non solo nel modo 
di fare musica, ma anche 
nel modo di studiarla". 

E alla musica si è dedi¬ 
cato da sempre, fatti sal¬ 
vi gli anni dell'esilio e 
della lotta contro il regi¬ 
me di Franco, occupando¬ 
si dapprima del commer¬ 
cio di dischi fuori catalo¬ 
go, ma molto ricercati da¬ 
gli esperti, in un'impor¬ 
tante opera di ritrovamen¬ 
to di brani popolari spa¬ 
gnoli che ha portato al 
salvataggio di un patri¬ 
monio musicale inestima¬ 
bile. Ma la ricerca non è 
la sua unica attività: pro¬ 
duttore nel campo della 
musica pop e classica - 
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ha firmato la sua prima 
opera nel 1968 - ha colla- 
borato con molti impor¬ 
tanti complessi spagnoli 
ed europei e, come mem¬ 
bro dell'AIMI, Associa¬ 
zione informatica musica¬ 
le italiana, sta ora lavo¬ 
rando con Haus, docente 
delladi visionedi Informa¬ 
tica musicale del Diparti¬ 
mento di scienza delle in¬ 
formazioni alla Statale di 
Milano. 

"E* possibile studiare 
la musica a diversi livel¬ 
li: il primo è quello fisi¬ 
co, quello che studia il 
suono, le note, le battu¬ 
te, il timbro; in questo 
campo gli americani so¬ 
no fortissimi, e Macinto¬ 
sh e i suoi programmi ne 
sono la riprova. Ma esi¬ 
stono altri livelli che so¬ 
no ancora pressoché ine¬ 
splorati e dove noi euro¬ 
pei siamo forti perché ab¬ 
biamo una capacità di a- 
strazione più elevata. Me¬ 
lodia, tonalità, ritmo e 
poi struttura semantica, 
sia formale sia musicolo¬ 
gica, sono i livelli ai qua¬ 
li stiamo lavorando an¬ 
che con l'aiuto delle reti 
di Pedi, che ci consento¬ 
no di studiare meglio e 
scomporrei processi che 
un autore ha utilizzato 
per generare un pezzo m u- 
sicale. Per esempio in 
questo momento stiamo 
studiando il Bolero di Ra- 
vel. Tra qualche mese, fi¬ 
nito lo studio con le reti 
di Pedi, podemo genera¬ 
re un Bolero tutto ricrea¬ 
to e gestito dal Macinto¬ 
sh, ma sempre nel massi¬ 
mo rispetto della cultura 
di base dell'autore." 

Serietà e voglia 
di innovare 

Renato Gelforte, 36 an¬ 
ni, perito industriale, ot¬ 
to anni di lavoro all'este¬ 
ro, quatdo in Africa e 
quatdo nei paesi Arabi. 
"Proprio in quei posti ho 
sentito parlare per la pri¬ 


ma volta di Apple da un 
gruppo di americani", di¬ 
ce Gelforte. Da quel mo¬ 
mento, tornato in Italia, 
in quatdo anni è diventa¬ 
to il responsabile dell'In- 
formation Technology, 
Apple Center nel cuore 
di Milano scelto dalla Ap¬ 
ple come esempio di 
computer shop da far visi¬ 
tare a John Sculley in un 
suo viaggio in Italia alla 
fine del 1984. "Avevo 
sentito parlare di lui", ri¬ 
corda Gelforte, "Certo 
non avrei mai pensato 
che in meno di due anni 
sarebbe diventato padon 
della Apple". 

Quali sono le cause dei 
frequenti alti e bassi che 
sta vivendo il settore? 

"Per quanto riguarda 
Apple c’è da fare un gros¬ 
so distinguo; da un lato 


la politica di Un personal 
per ogni famiglia, base 
di partenza dell'impero 
costruito da Steve Jobs, 
si è dimosdata, anche per 
gli stessi americani, pre¬ 
matura. Dall'aldo, nelle 
grandi utenze, intese co¬ 
me grandi società, c’è da 
superare un ostacolo di 
fondo creato dai responsa¬ 
bili dell'edp aziendale che 
vedono il personal com¬ 
puter come uno sdumen- 
to che porta da una parte 
a una perdita di potere, e 
dall'alda a un decenda- 
mento dei mezzi azienda¬ 
li che reputano difficil¬ 
mente gestibile". 

Qual è la chiave che 
podebbe sbloccare questa 
situazione? 

"A mio avviso dovreb¬ 
bero essere sviluppati dei 
nuovi quadri all'interno 


delle aziende. Dei nuovi 
personaggi che permetta¬ 
no un trait d'union da il 
manager e il responsabile 
dell'Edp, in pratica un 
collegamento da il perso¬ 
nal e il mainframe azien¬ 
dale." 

Rimangono dunque i 
professionisti. 

"Esatto. E' la fascia di 
utenza che rappresenta la 
maggiore fetta del nosdo 
parco clienti." 

Cosa fate per garantir- 
vene la fedeltà? 

"'Assistenza e suggeri¬ 
menti pratici sono le ri¬ 
chieste più frequenti. Ed 
è anche quello che cer¬ 
chiamo di dare perchè, 
tutto sommato, si otten¬ 
gono soddisfazioni a por¬ 
tare a casa ogni giorno 
soluzioni che alimentano 
il nosdo know-how..." 
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Mac// 

Un emulatore software di 
Apple//+ e Apple//e per 
Macintosh 512: basta 
inserire il dischetto Mac// in 
un Macintosh, ed eccolo 
trasformato in un Apple//. 
Con il Dos e il ProDos. 





Mac// 

è un programma JRD 
edito in Italia 
da Editronica Srl. 

Acquistalo subito. 


Per ricevere Mac// basta compilare 
e spedire subito questo 
tagliando a Editronica Srl, 

Corso Monforte 39, 20122 Milano. 
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Stampare 
in technicolor 

La nuova stampante 4/66 
Honeywell è veloce, si¬ 
lenziosa, dotata di colore 
ed è destinata a chi ha esi¬ 
genze particolari in termi¬ 
ni di qualità di stampa. 
Nel modo draft si rag¬ 
giungono i 480 caratteri 
al secondo (diventano 75 
in letter quality), ma si 
può optare anche per la 
stampa di qualità a 180 
caratteri al secondo. La 




Super memoria 
per Mac Plus 

Quando si comincia a 
raginare in termini di me¬ 
gabyte, Timmagine che 
subito si presenta alla 
mente è quella di un in¬ 
gombrante disco rigido. 

Il Macintosh Plus, in¬ 
vece, può arrivare a due 
megabyte di memoria, di¬ 
sponibile da Finder, sen¬ 
za che sia necessario fare 
ricorso a un software par¬ 
ticolare. La memoria ag¬ 
giuntiva MaxPlus, infat¬ 
ti, consiste in una serie 
di moduli facilmente inse¬ 
ribili negli zoccoli fomi¬ 
ti dalla Apple e permette 
di lavorare tranquillamen¬ 
te con programmi quali 
Lotus 1-2-3 ed Excel con¬ 
servando ancora spazio 
per creare, per esempio, 
dischi Ram. E, nel caso 
fosse stato installato un 
disco interno, c'è la ver¬ 
sione MaxPlus Enhanced 
da 2,5 megabyte. E per o- 
gni acquirente la Elcom, 
distributrice di MaxPlus 
(corso Italia 149, Gori¬ 
zia, tei. 0481/30909), of¬ 
fre in omaggio Max- 
Chili, MaxRam e Max- 
Print, cioè rispet¬ 
tivamente un ven¬ 
tilatore per Mac, il 
soft che consente la crea¬ 
zione automatica di un 
Ram disk e un soft 
per lo spool di 
stampa. MaxPlus 
costa £ 998.000 (+Iva). 


4/66, poi, può gestire 
moduli continui fino a 
136 colonne e fogli dei 
formati A3 e A4 in en¬ 
trambe le dimensioni. La 
testina è a 18 aghi dispo¬ 
sti su due file paral¬ 
lele ed è racchiu¬ 


sa in un guscio di plasti¬ 
ca antirumore che consen¬ 
te di limitare le 


contrario, si 
rende neces¬ 


sario un a- 
dattamento 
del softwa¬ 
re impie¬ 
gato. 


emissioni 
sonore 

li .* 1 

dell’ap¬ 
parecchio entro 
i 55 decibel. Infine 
l'affidabilità: i tecnici del¬ 
la Honeywell assicurano 
che la 4/66 può continua¬ 
re a lavorare senza guasti 
in media per quattro an¬ 
ni. Questa nuova stam¬ 
pante made in Usa può 
essere utilizzata con gli 
Apple II, a patto che ven¬ 
gano utilizzati pacchetti 
di software in grado di pi¬ 
lotare anche stampanti 
Ibm Graphic Printer 
ed Epson Jx 
80. In caso 




















Dieci caratteri 
per il mouse 

Si chiama Multiscribe, 
è stato sviluppato dalla 
statunitense Styleware ed 
è un programma studiato 
per gli Apple Ile e Ile do¬ 
tati di mouse: i menù so¬ 
no a discesa, come nel 
Macintosh e sul video si 
può vedere l’esatta copia 
di ciò che verrà riprodot¬ 
to in stampa. 

E come i programmi 
nati per Macintosh anche 
Multiscribe è di uso sem¬ 
plicissimo. 

Basta lanciarlo per tro¬ 
varsi nella finestra dove 
si creano i documenti di 
word processor o si usa¬ 
no testi salvati come file 
ASCII. 

A questo punto si pos¬ 
sono scegliere il tipo di 
carattere(quellidisponibi- 
li sono dieci, ma se ne 
possonocrearedipersona- 
lizzati), il corpo e lo sti¬ 
le, magari evidenziando u- 
na parte del testo. Non 
mancano le funzioni di E- 
dit (taglia e incolla, ricer¬ 
ca e sostituzione di una 
data parola) e il righello 
con c ui modificare diretta- 
mente sul monitor la spa¬ 
ziatura, allineando e giu¬ 
stificando il testo. 

Multiscribe costa 100 
mila lire (Iva esclusa) ed 
è distribuito dalla Infor¬ 
mation Technology di 
Milano (l'indirizzo è via 
dei Bossi 7, telefono 
02/8692885). 

La stampante 
sempre a posto 

E' stato battezzato Mi- 
crofold ed è un supporto 
destinato a sostenere e ali¬ 
mentare qualsiasi stam¬ 
pante, per evitare che que¬ 
sta importante periferica 
finisca per dare alla scri¬ 
vania un aspetto disordi¬ 
nato con il suo corredo di 
carta a modulo continuo 
e di cavi di connessione. 
In concreto, la stampante 




viene appoggiata 
su un piano incli¬ 
nato a 22 gradi stu¬ 
diato per assicurare 
una perfetta alimen¬ 
tazione della carta e 
l’accumulo dei fogli 
già stampati, mantenen¬ 
do contemporaneamente 
una comoda visuale di 
ciò che viene scritto.Mi- 
crofold è disponibile nel¬ 
le versioni per stampanti 
a 80 e a 132 colonne ed è 
distribuito dalla Sedagraf 
di Torino (l’indirizzo è: 
largo Re Umberto 106, 
telefono 011/501424). 


Dalog per Mac 
allo SMAU 


Chi utilizza i compu¬ 
ter dello standard MS- 
DOS lo conosce mito be¬ 
ne. Potrà conoscerlo ora 
anche l’utente Mac, gra¬ 
zie al lancio che la Ital- 
ware, che lo produce, ha 
annunciato per lo SMAU 
’ 86 . 

E' Dalog, il program¬ 
ma per la gestione azien¬ 
dale composto dai modu¬ 
li di fatturazione, conta¬ 
bilità, magazzino e repor- 
ting e caratterizzato da 
un'estrema facilità di uti¬ 
lizzo e possibilità di per¬ 
sonalizzazioni spinte. 

Proprio per la possibi¬ 
lità di personalizzarlo 
non è possibile definirne 
il prezzo, che varia a se¬ 
conda della versione ri¬ 
chiesta dall’utente. 

Funziona con i Mac 
dotati di almeno 512 K 
di memoria e di Hard 
Disk. 


Le pagine gialle 
di chi applica 

La redazione di Appli¬ 
cando si presenta a un im¬ 
portante appuntamento 
con gli utenti dell’Apple 
II e del Macintosh: esce 
in questi giorni, infatti, 
il quarto volume delle Pa¬ 
gine Software e Hardware 
per Apple. 


Uno strumento fonda- 
mentale per chi usa un 
computer della serie II, 
un catalogo ragionato di 
tutto il software e l’hard- 
ware, un aiuto indispen¬ 
sabile per ottimizzare 
l'uso del proprio personal 
computer. 

E anche uno strumento 
essenziale da consultare 
prima dell’acquisto del 
computer, perché permet¬ 
te di scoprire resistenza 
o meno di software e 
hardware adatto allo sco¬ 
po per cui si è deciso l’ac¬ 
quisto di un personal. 

E veniamo al Macin¬ 
tosh: il rivoluzionario 
computer della Apple è 
oggi in grado di offrire ai 
suoi utilizzatori centinaia 
di programmi adatti a ri¬ 
solvere le esigenze 
più disparate. 

Nelle Pagine 
Software e Hard¬ 
ware troverete 
la descrizione 
dettagliata di 
tutti i pac¬ 
chetti di¬ 
sponibili 
in Italia, 
con l'in¬ 
dicazio¬ 
ne del 


del produttore e dell'im¬ 
portatore: in pratica, una 
guida affidabile e com¬ 
pleta per effettuare i vo¬ 
stri acquisti a colpo sicu¬ 
ro e a ragion veduta. 

Non manca, natural¬ 
mente, una sezione hard¬ 
ware. Come avere questo 
quarto volume delle Pagi¬ 
ne Software e Hardware ? 

Acquistatelo utilizzan¬ 
do il tagliando pubblica¬ 
to a pag. 59 in questo nu¬ 
mero (costano 20 mila 
lire). 

Oppure, più semplice- 
mente, abbonatevi o rin¬ 
novate il vostro abbona¬ 
mento ad Applicando, a 
tutti gli abbonati, infatti. 
Applicando regala le sue 
pagine gialle, per applica¬ 
re sempre meglio. 
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Guida alle 
stampanti 
Epson 

La stampante è uno 
strumento indispensabile 
per qualsiasi sistema in¬ 
formatico, dai personal 
computer ai grandi main¬ 
frame: spesso però queste 
periferiche creano una se¬ 
rie di problemi agli uten¬ 
ti. 

Guida alle stampanti E- 
pson è il primo libro de¬ 
dicato a una delle linee 
di stampanti più diffuse 
e, dopo un'ampia descri¬ 
zione delle caratteristiche 
delle diverse serie, tratta 
in dettagli tutti gli argo¬ 
menti più importanti (so¬ 
prattutto quelli general¬ 
mente trascurati nei ma¬ 
nuali che accompagnano 
le macchine). 

Capitolo dopo capitolo 
si passa così a esaminare 
i set di caratteri e i modi 
di stampa, la grafica, l'in¬ 
terfacciamento con il 
computer, la creazione di 
set speciali di caratteri... 

Si tratta dunque di un 
libro destinato a fare sco¬ 
prire tutte le prestazioni 
potenziali della proria 
stampante, ma anche a 
fornire una guida all’ac¬ 
quisto della periferica più 
adatta a ogni singola esi¬ 
genza. 

Guida alle stampanti E- 
pson, 220 pagine, è edito 
dalla McGraw Hill e co¬ 
sta 25 mila lire. 



Guida alle 
stampanti Epson 
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Lavorare e 
giocare con Mac 

Pratico, fantasioso e di¬ 
vertente, il libro Lavora¬ 
re con Macintosh, gioca¬ 
re con Macintosh è una 
vera e propria miniera di 
idee per sfruttare al me¬ 
glio il piccolo grande per¬ 
sonal della mela sia a ca¬ 
sa sia in ufficio. L'auto¬ 
re, Lon Poole, ha raccol¬ 
to numerose applicazioni 
che utilizzano pacchetti 
di software ormai diventa¬ 
ti dei classici (MacWrite, 
MacPaint e Multiplan). 
Dopo una breve introdu¬ 
zione, viene spiegato co¬ 
me scrivere una relazione 
con MacWrite, come rea¬ 
lizzare una carta da lettera 
intestata con MacPaint e 
come tenere la contabili¬ 
tà con Multiplan. Poi il 
libro illustra una ventina 
di programmi originali 
che integrano i potenti 
pacchetti di software e 
che possono con facilità 
essere sviluppati dai letto¬ 
ri. Ci sono applicazioni 
destinate al lavoro (anali¬ 
si finanziarie, preparazio¬ 
ne di circolari, annunci 
pubblicitari e bilancio) e 
al tempo libero. 

Tra queste ultime si se¬ 
gnalano come tenere l'in¬ 
ventario di una collezio¬ 
ne, come progettare al 
computer il giardino di 
casa e un programma per 
la pianificazione del bu¬ 
dget familiare. 

Lavorare con Macin¬ 
tosh, Giocare con Ma¬ 
cintosh è edito da Arnol¬ 
do Mondadori e costa 55 
mila lire. 


Microsoft Excel 
with Macros 

Microsoft Excel, uno 
dei software più venduti 
del momento per Macin¬ 
tosh, non è solo un fo¬ 
glio elettronico, ma an¬ 
che un software multifun¬ 
zione che incorpora grafi¬ 
ca, database e possibilità 
di programmazione. 

I "programmi" che pos¬ 
sono essere scritti con 
Excel si chiamano Ma- 
cro. Con le possibilità of¬ 
ferte da Excel ognuno 
può prepararsi le proprie 
Macro ottenendo una 
maggior automazione e 
semplificazione di sprea¬ 
dsheet, comandi e funzio¬ 
ni complesse non imple¬ 
mentate direttamente dal 
programma, e un sofisti¬ 
cato controllo di applica¬ 
zioni interattive. 

Microsoft Excel with 
Macro è il libro giusto 
per chi vuole muovere i 
primi passi nella creazio¬ 
ne di Macro per le pro¬ 
prie esigenze di utilizzo 
di Excel. 

Diviso in tre sezioni 
con un totale di 12 capi¬ 
toli, introduce il lettore 
al concetto di Macro e di 
registrazione della stessa, 
per poi passare nei capito¬ 
li successivi ad affronta¬ 
re esempi di sempre mag¬ 
gior difficoltà. 

Microsoft Excel with 
Macros, di Douglas Her- 
gert (257 pagine) è edito 
dalla Microsoft Press. 
Costa 21.95$., 



Hands'On. 
Microsoft Excel 


— 



Hands-On™ 
Microsoft® Excel 


Excel è il tipico esem¬ 
pio di programma facile 
da utilizzare come i più 
semplici fogli elettroni¬ 
ci, ma con tante e tali 
possibilità da farlo consi¬ 
derare uno dei più poten¬ 
ti programmi per perso¬ 
nal computer mai realiz¬ 
zati. Così per prendere 
confidenza con questo 
programma è nato il li¬ 
bro Hands-On Microsoft 
Excel. Più che un libro 
nel senso classico della 
parola è un vero e pro¬ 
prio exercise-book che 
non si può leggere como¬ 
damente seduti sulla pro¬ 
pria poltrona preferita, 
ma davanti a un Macin¬ 
tosh acceso con il pro¬ 
gramma Excel in memo¬ 
ria. I sette capitoli nei 
quali è suddiviso il libro 
consentono un avvicina¬ 
mento step-by-step a que¬ 
sto potente programma, 
esplorando e toccando 
con mano tutte le sue 
possibilità attraverso una 
serie di esercizi a pro¬ 
gramma aperto che inizia¬ 
no praticamente dalla pri¬ 
ma pagina del libro. Il li¬ 
bro viene fornito comple¬ 
to di un dischetto conte¬ 
nente i documenti appli¬ 
cativi di Excel sui quali 
si basano tutti gli eserci¬ 
zi descritti nel libro. Han¬ 
ds-On™ Microsoft® Ex¬ 
cel, di Judy Mynhier e 
Douglas Cobb (267 pagi¬ 
ne più un dischetto conte¬ 
nente documenti Excel), 
è edito da The Cobb 
Group. Costa £ 95.000. 
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Sei proprio sicuro 
che il tuo computer 
sia sempre al sicuro? 


Incidenti di trasporto, furti anche dall'auto o dalla camera 
d'albergo, cortocircuiti, bevande rovesciate sulla tastiera, 
bambini o inesperti che ci mettono le mani... Ecco i pericoli 
che correva il tuo computer prima della polizza Applicando. 


Condizioni generali di assicura¬ 
zione: 

1) Premessa : a) l'adesione alla 
presente polizza è riservata ai pro¬ 
prietari di un Personal Computer il 
cui valore stabilito come alla Condi¬ 
zione 6) sia superiore a L. 
2.500.000 Iva compresa; b) l'adesio¬ 
ne alla presente polizza da parte dei 
proprietari di personal computer av¬ 
verrà a mezzo invio di apposita car¬ 
tolina con il relativo importo di pre¬ 
mio; c) l'intestatario della cartolina 
sarà considerato a tutti gli effetti co¬ 
me l'Assicurato; d) la garanzia sarà 
operante dalle ore 24 del giorno di 
spedizione della cartolina, risultante 
dal timbro postale. La copertura a- 
vrà durata un anno, sempre che la 
data di inizio della garanzia sia com¬ 
presa nel periodo di validità della 
convenzione. 

Garanzie e condizioni 

2) Sez. I - Danni materiali. Deri¬ 
vanti da: a) incendio, opera di spe¬ 
gnimento e salvataggio, fulmine, e- 
splosione, scoppio, implosione; b) a- 
cqua e liquidi in genere, inondazio¬ 
ne, alluvione, trombe, uragani, ge¬ 
lo, ghiaccio, neve, grandine, valan¬ 
ga, caduta massi e altri simili even¬ 
ti; c) superamento del muro del suo¬ 
no, caduta di aeromobili o cose da 
essi trasportate; d) corto circuito, 
variazione di corrente, sovratensio¬ 
ne arco voltaico, deficienze di isola¬ 
mento, effetti di elettricità statica, 
induzione; e) imperizia, negligen¬ 
za, errata manovra, nonché azioni 
dolose e colpose in genere; f) tra¬ 


sporti e smontaggi connessi con la¬ 
vori di pulizia o di manuten¬ 
zione; g) furto e rapina; h) terremo¬ 
to, maremoto o eruzioni vulcani¬ 
che; i) persone che prendono parte 
a tumulti popolari, scioperi, som¬ 
mosse e che perpetrino individual¬ 
mente o in associazione atti di terro¬ 
rismo o sabotaggio verificatisi in 
occasioni di serrate. 

3) Sez. II - Responsabilità Civile 
Terzi: L’assicurazione si intende i- 
noltre prestata per la Responsabili¬ 
tà Civile derivante all’Assicurato 
dalla proprietà e dall'uso personale 
del computer assicurato, identifica¬ 
to nel certificato di assicurazione. I 
massimali di garanzia si intendono 
fissati in: L. 100.000.000 per sini¬ 
stro con il limite di L. 100.000.000 
per ciascuna persona deceduta o 
che abbia subito lesioni personali 
L. 100.000.000 per danni a cose e/o 
animali. 

4) Esclusioni: La Società non è 
obbligata per i danni dovuti a: - do¬ 
lo dell'Assicurato; - corrosione, de¬ 
perimento, logoramento che siano 
conseguenza del normale uso o fun¬ 
zionamento o causati dagli effetti 
graduali degli agenti atmosferici; - 
per i quali deve rispondere il forni¬ 
tore, venditore o locatore degli enti 
assicurati per legge o per contratto 
o per inaaeguata manutenzione; - 
causati da difetti di materiale o di 
costruzione che esistevano già all'at¬ 
to della stipulazione della polizza e 
erano a conoscenza dell’Assicurato;- 
causati direttamente o indirettamen¬ 


te da avvenimenti bellici, sommos¬ 
se militari, invasioni, adozione di 
misure da parte di potenze straniere, 
rivoluzione, ribellione, insurrezio¬ 
ne, assunzione ©usurpazione di pote¬ 
re di carattere militare, sequestri; - 
verificatisi in occasione di esplosio¬ 
ne, radiazione nuclerare o di conta¬ 
minazione radioattiva; - uso impro¬ 
prio del bene (mancato rispetto del¬ 
le norme di impiego dettate dal co¬ 
struttore); - danni estetici (quelli in¬ 
teressanti l’involucro esterno che 
non sia conseguenza di un danno ri¬ 
sarcibile a termine della presente po¬ 
lizza); - guasti casualmente ricondu¬ 
cibili a interventi, a riparazioni e/o 
modifiche effettuate da un centro 
non autorizzato dalla casa costruttri¬ 
ce della macchina; - danni indiretti 
in genere. 

5) Operatività della garanzia: a) 
la garanzia è operante solamente se 
gli enti assicurati sono ubicati pres¬ 
so il domicilio dell'Assicurato o in 
luoghi diversi da questi se in posses¬ 
so dell'Assicurato; b) la garanzia è 
pure efficace se i beni si trovano sul¬ 
l'autovettura in uso all'Assicurato, 
salvo i seguenti casi: - qualora l'au- 


Sì! Desidero assicurare i miei/il mio computer, in¬ 
viatemi a stretto giro di posta il certificato emesso dal¬ 
la Ras. L'assicurazione avrà valore a decorrere dalle 
ore 24 del giorno di spedizione della mia adesione. 
Per la data fa fede il timbro postale. 

COGNOME ___ 



NOME- 


INDIRIZZO. 


CAP- 


Città 


-PROV. 


Assicuro i/il seguente personal: 
Marca e Modello 


N. di matricola 


Valore (Iva compresa) 


Con le seguenti periferiche (stampanti, video, drive, hard-disk, ecc.): 

Marca e Modello N. di matricola Valore (Iva compresa) 


In caso di spazio insufficiente ricopiate su un foglio il tagliando indicando i prodotti che intendete assicurare. 

Per un totale complessivo di Lire . su cui pa¬ 

go il premio calcolato in base alla tabella riportata qui sopra. Allego assegno non trasferibile di 
Lire.intestato a Editronica srl, Corso Monforte 39, 20122 Milano. 


tovettura venga lasciata incustodita 
dalle ore 22 alle ore 6; - qualora 
l’autovettura regolarmente chiusa a 
chiave venga lasciata incustodita 
dalle ore 6 alle ore 22 e gli enti assi¬ 
curati non opportunamente occulta¬ 
ti nel bagagliaio; c) limitatamente 
ai danni di rottura la garanzia è effi¬ 
cace solamente nel caso questi sia¬ 
no dovuti a un incidente in cui ri¬ 
manga coinvolto anche il veicolo 
in uso dell'Assicurato che trasporta¬ 
va i beni assicurati; d) per gli enti 
per i quali non è stato stipulato il 
contratto di manutenzione e/o assi¬ 
stenza con la casa costruttrice e/o 
ditte di essa mandatarie qualora l'en¬ 
te richieda per norma del fornitore 
detto contratto, la società non ri¬ 
sponde dei danni verificatisi in con¬ 
seguenza di guasto meccanico e/o e- 
lettrico salvo che l'Assicurato pro¬ 
vi che tale guasto sia causato da e- 
vento esterno agli enti assicurati o 
da incendio originato da uno di que¬ 
sti enti. 

6) Somma Assicurata: La somma 
assicurata per ciascun ente deve cor¬ 
rispondere al costo di rimpiazzo, os¬ 
sia al prezzo di listino della casa co¬ 
struttrice ed escluso ogni sconto o 
prezzo di favore di un ente nuovo, 
eguale o equivalente per caratteristi¬ 
che, prestazioni e rendimento eco¬ 
nomico. 

7) Premio: Per ogni singola appli¬ 
cazione è stabilito un premio forfet¬ 
tario omnicomprensivo così calco¬ 
lato: 


Somma assicurata 

Premio 

da 

2.500.000 


a 

3.000.000 

50.000 

da 

3.000.000 


a 

5.000.000 

.65.000 

da 

5.000.000 


a 

7.000.000 

80.000 

da 

7.000.000 


a 

10.000.000 

100.000 

da 

10.000.000 


a 

15.000.000 

120.000 

da 

15.000.000 


a 

20.000.000 

150.000 


8) Franchigia. Per ogni e qualsia¬ 
si danno che colpisca gli enti assicu¬ 
rati è stabilita una franchigia di: L. 
50.000 per somma assicurata fino a 
L. 5.000.000; L. 100.000 per som¬ 
ma assicurata superiore a L. 
5.000.000. Per sinistri causati da e- 
venti come ai punti g) ed h) delle ga¬ 
ranzie prestate, la Società liquiderà 
i danni sotto deduzione di uno sco¬ 
perto pari al 20% della somma assi¬ 
curata, col minimo delle franchigie 
sopra stabilite. 

9) Rinvio alle norme di legge. 
Per tutto quanto non è qui diversa- 
mente regolato, valgono le norme 
di legge. 


e applicando vi mettono al sicuro 

































DESK ACCESSORY 


Ben più potente della calcolatrice o dell'orologio in dotazione al Macintosh, 
c'è tutta una gamma di accessori, dalle sorprendenti prestazioni, 
che è possibile acquistare e installare nel menù mela della scrivania... 



SIDEKICK 


TELEPORT 


MOCK CHART 


MOCK TERMINAL 


QUICK & DIRTY 


TOPMAIL 


Una melina 
carica di... 


La possibilità di usare i desk acces- 
sory, ovvero gli accessori da scriva¬ 
nia installati sotto il menù mela del¬ 
la scrivania di Macintosh, è una del¬ 
le caratteristiche più affascinanti di 
questa macchina, perché avere una se¬ 
rie di strumenti disponibili con qual¬ 
siasi applicazione è conveniente e fa 
risparmiare tempo nel lavoro. Que¬ 
sti accessori da scrivania si dividono 
però in due categorie: quelli che si u- 
sano e quelli che non si usano. 

La maggior parte di essi appartie¬ 
ne alla seconda categoria, per tre ra¬ 
gioni principali: 

1. non fanno nulla di veramente u- 
tile; 

2. non funzionano correttamente; 

3. non si conosce la loro esistenza. 
Per le due prime motivazioni non 

ce molto da dire; è possibile però su¬ 
perare il terzo problema scoprendo 
quali sono i desk accessory migliori 
tra la miriade di prodotti per Macin¬ 
tosh. 

Sidekick 

Prodotto dalla Borland Internatio¬ 
nal, è un insieme di accessori da scri¬ 


vania molto utili, che comprendono: 
Area Code Lookup, Calculator +, 
Calendar Book, MacClock, Mac- 
Dialer, Note Pad +, QuickSheets, 
MacTenn, ReadiPrinter. 

Tutti i dati relativi alle varie fun¬ 
zioni sono memorizzati in una cartel¬ 
la chiamata Data-Philes; questa car¬ 
tella non necessariamente deve tro¬ 
varsi sullo stesso disco in cui si tro¬ 
va il System che contiene i vari ac¬ 
cessori, quindi è possibile avere un 
dischetto dati separato con tutte le in¬ 
formazioni correnti, e accedere a es¬ 
so da qualsiasi applicazione che si 
sta usando. 

• Area Code Lookup. Forni¬ 
sce la località, la regione e il fuso o- 
rario di qualsiasi codice di area geo¬ 
grafica introdotta; usata insieme con 
Note Pad-i- la lista delle aree geografi¬ 
che può essere usata per ricercare l'a¬ 
rea di una particolare città. Non sarà 
una cosa da usare tutti i giorni, ma è 
simpatico avere le informazioni sul¬ 
la punta delle dita. 

• Calculator+. E' una calcolatri¬ 
ce finanziaria multifunzione, che usa 
rimageWriter o il video per simula¬ 
re la stampantina di una qualsiasi cal¬ 


colatrice tascabile. Tra le sue varie 
caratteristiche la possibilità di una 
memoria, le funzioni algebriche (ra¬ 
dici quadrate, logaritmi naturali e in 
base 10 eccetera), le funzioni trigo¬ 
nometriche normali e inverse (seno, 
coseno, tangente, arcseno, arccoseno 
eccetera) e le funzioni finanziarie 
(calcolo degli interessi, interessi 
composti, ratei eccetera). 

• Calendar Book. E' un'agenda 
per appuntamenti (figura 1) che 
non solo tiene in ordine gli appunta¬ 
menti, ma permette anche di vedere 
tutti i mesi fino al 2030 D.C.; è 
possibile aggiungere degli appunti 
su un blocco note libero con barra di 
scorrimento sia orizzontale.sia verti¬ 
cale. Con un click sulla data voluta 
si possono vedere gli appuntamenti 
e le note relative per quel giorno. Li¬ 
na caratteristica veramente simpatica 
è la funzione di Week-at-a-Peek che 
rende possibile e facile visualizzare 
come si è organizzata la settimana: i- 
noltre essa può anche essere stampa¬ 
ta in formato A5 (cioè mezzo foglio 
di carta da lettera A4) come prome¬ 
moria da portare con sé. Esiste an¬ 
che una funzionze di ricerca che aiu- 
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ta a trovare in quale giorno è stato 
fissato l'appuntamento ricercato. 

• MacClock. E' la simulazione 
di un orologio analogico a tutto vi¬ 
deo, che prende l'ora dall'orologio di 
Macintosh, e quindi può essere rego¬ 
lato con il relativo pannello di con¬ 
trollo. 

• MacDialer. E' una rubrica di 
numeri telefonici (figura 2), che 
può essere utilizzata con il Phone 
Link (un telefono collegato a Macin¬ 
tosh) e comporre quindi automatica- 
mente il numero di telefono della 
persona richiesta. Su di esso è pos¬ 
sibile memorizzare non solo numeri 
di telefono, ma anche particolari co¬ 
dici di accesso relativi a posta elettro¬ 
nica via computer, home banking e 
altro ancora. Mac Dialer è in grado 
di registrare la durata delle chiamate 
fatte o ricevute con il relativo costo: 
inoltre riesce persino a calcolare le 
tariffe di consultazione delle banche 
dati usate. In ogni caso durante la te¬ 
lefonata è possibile prendere appunti 
o continuare a svolgere il proprio la¬ 
voro. La sua utilità, evidentemente, 
è data dalla possibilità di avere un 
dettaglio delle telefonate di lavoro 
con registrate la durata, la persona 


chiamata e il costo. Il Phone Link è 
un optional di questo pacchetto so¬ 
ftware, da col legare alla presa audio 
di Macintosh, che invia impulsi to¬ 
nali per comporre automaticamente 
il numero della persona desiderata, ri¬ 
manendo in attesa se il numero com¬ 
posto dà segnale di occupato, e ripro¬ 
vando dopo pochi minuti. 

• Note Pad+. E' un mini word 
processor, che legge e scrive file di 
testo standard (compatibili con Mac- 
Write, MS Word e tanti altri text edi¬ 
tor); può essere richiamato durante il 
lavoro con qualsiasi applicazione, e, 
a differenza del blocco note Apple, 
può lavorare a schermo pieno e ogni 
documento può essere composto da 
più pagine e salvato su disco. Inol¬ 
tre. poiché i dati relativi ad Area Co¬ 
de Lookup e MacDialer, nonché le 
note del Calendar Book, sono memo¬ 
rizzati come file di testo, possono es¬ 
sere richiamati con questo accesso¬ 
rio. per essere visualizzati, corretti o 
stampati. L'opzione Find è utilizza¬ 
ta per ricercare e visualizzare un par¬ 
ticolare appunto, o per trovare un 
particolare Code Area di una città, o 
ancora per cercare la nota relativa a 
un appuntamento. 



Figura 1. 


• QuickSheets. Permette di uti¬ 
lizzare fino a 21 fogli elettronici, cia¬ 
scuno dei quali possiede un certo nu¬ 
mero di linee e di colonne, riempibi- 


Accessori da scrivania: le caratteristiche, i prezzi e gli indirizzi 

Nome del 
programma 

Compatto. 
! con HFS 

Nome e indirizzo 
del produttore 

Distributore 

italiano 

Costo del 
programma 

SIDEKICK 

SÌ 

Borland International 

4585 Scotts Valley CA 

95066 USA 

Bits & Bytes 

v. S.Francesco d'Assisi 8 
Milano tei. 02 8376207 

£235.000 

TELEPORT 

sì 

Hacker & Nerd, Hombrock 

18167 Camp Creck CA USA 

| 

no 

$ 20,00 

MOCKCHART 

sì 

CE Software 801 73rdSt. 

Des Moines IA 50312 USA 

no 

$ 30,00 

MOCKTERMINAL 

sì 

CE Software 801 73rd St. 

Des Moines IA 50312 USA 

no 

$ 30,00 

QUICK & DIRTY 

in parte 

Dreams of thè Phoenix Ine. 
PO Box 10273 

Jacksonville FL USA 

no 

$ 39,95 

TOPMAIL 

SÌ 

TopExpress Ltd, 13/14 

Round Church Street 
Cambridge, Great Britain 

New Line srl 
v. G. Frua 12 

Milano, tei. 02 4697205 

_1 

£659.000 
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AST Research Ine. 

Borland I nternational 
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& 


JPhone Notes 1 


J 


LLlrite Notes j | 
fjl P a r No tes ) 

.[N e tu Entry j| 

Figura 2. 


Informazioni sul nuovo Macintos Plus Extra) 


li con numeri o fonnule esattamente 
come si farebbe con un foglio elet¬ 
tronico tipo Multiplan o altri. Nel 
pacchetto si trovano 4 fogli elettroni¬ 
ci predefiniti: 

- Alarms, che come suggerisce il 
nome avvisa tramite segnale sonoro 
alla scadenza di un particolare even¬ 
to. Quando ciò avviene la melina si 
mette a lampeggiare per avvisare an¬ 
che visivamente della scadenza: tutto 
questo anche se QuickSheets è chiu¬ 
so: aprendolo si potrà vedere il mes¬ 
saggio che ha provocato l'allarme. 
Nel caso in cui Macintosh sia spen¬ 
to, ovviamente non accadrà nulla, 
ma alla successiva accensione si leg¬ 
gerà a video un messaggio con l'av¬ 
viso deN'allarme già avvenuto. 

- Tlìinks to do, che permette di crea¬ 
re un elenco di appuntamenti o cose 
da fare; un particolare controllo per¬ 
mette di eliminare le cose già fatte 
dall'elenco, oppure di stampare quel¬ 
le ancora da fare. 

- Credit Cards . che permette di tene¬ 


re in ordine le spese effettuate con u- 
na carta di credito, e ne fornisce i to¬ 
tali: in un attimo si può avere la si¬ 
tuazione contabile di una o più carte 
di credito (figura 3). 

- E.xpenses, che permette di tenere 
in ordine le spese per vedere quanto 
si è speso e dove, ovviamente con 
tutti i totali. 

• MacTerm. E' un programma 
per la trasmissione di dati via telefo¬ 
no, per modem compatibili Hayes 
da 300, 1200 e 2400 bauds; tra le 
sue caratteristiche troviamo la possi¬ 
bilità della chiamata diretta, oltre a 
spedire o ricevere dati via telefono. I 
testi ricevuti possono essere memo¬ 
rizzati su disco, così come da disco 
si possono spedire file di testo. Poi¬ 
ché il file sono compatibili con No- 
tePad+, è possibile usare questo ac¬ 
cessorio per visualizzarli ed editarli. 
MacTerm non è un completo emula¬ 
tore di terminale, in quanto non sup¬ 
porta trasferimenti con protocolli 
Xmodem o MacBinary, ma diventa 


molto utile nelle comunicazioni quo¬ 
tidiane di dati in formato testo (o A- 
SCII). 

• ReadiPrinter. Quasi uno 
spooling di stampa, in quanto fun¬ 
ziona solo con file di testo e quindi 
non usa i font di caratteri di Macinto¬ 
sh, permette di aprire il documento 
da stampare, sceglierne il fonnato e 
inviarlo alla stampa, il tutto mentre 
si lavora ad altro. Può risultare mol¬ 
to utile quando si devono eseguire 
spesso stampe di controllo o molto 
lunghe. Può ovviamente essere usa¬ 
to per stampare con NotePad+ e 
QuickSheets. 

Oltre a queste nove applicazioni, 
Sidekick possiede la capacità di com¬ 
binare MacCalendare MacDialercon 
particolari forme di editing e include 
un PrintManager in grado di ordinare 
e formattare le stampe della rubrica 
telefonica, creata con MacDialer, in 
molti modi. Possiede inoltre una uti¬ 
lity, detta Convert, in grado di con¬ 
vertire i file MacPhone, Habadex e 
altri file di testo in file compatibili 
con la rubrica telefonica di Sidekick. 
L'Editor Quicksheets, infine, è in 
grado di creare nuovi fogli elettroni¬ 
ci personalizzabili a piacere. Ovvia¬ 
mente vengono supportate tutte le 
caratteristiche di Macintosh come il 
taglia e incolla, la Clipboard ecc. 

Teleport 

Quest’accessorio offre prestazioni 
simili a quelle di Switcher; infatti 
permette di passare da un'applicazio¬ 
ne all'altra senza dover uscire dal pro¬ 
gramma e passare attraverso il Fin- 
der (figura 4), con un notevole e 
reale risparmio di tempo nell'esecu¬ 
zione dei lavori. 

AI contrario di altri prodotti simi¬ 
li, Teleport permette di portarsi die¬ 
tro l'Archivio Appunti (o Clipboard 
File) quando si passa a un altro pro- 


Company Number Exp. Last Report Limit Boi ance 

Rmer.Expres 

555-55456-221 

1/18 


1000 

400 

U i sa 

444-44444-221 

1/21 

yes 

1500 

800 

MasterCard 

9909-999-9999 

2/11 


2000 

1200 

Sears 

3092-962-6541 

4/22 


800 

50 





































Nj TOTAL 5300 2450 


Figura 3. 
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Bìnhe» 5.0 
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Fedit 3.05 
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FreeTerm 
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gramma, e consente di cambiare il di¬ 
sco di startup. 

Essendo compatibile sia con il 
System MFS (Macintosh File 
System), sia con il nuovo System 
HFS (Hierarchical File System), è 
in grado di lavorare sia con i dischet¬ 
ti sia con i dischi rigidi. 

La differenza da Switcher consiste 
nel fatto che non si possono avere 
più applicativi aperti contemporanea¬ 
mente, e che il caricamento è un po’ 
più lungo. 

Il vantaggio, ovviamente, risiede 
nel fatto che ogni applicativo può 
contare su tutta la memoria disponi¬ 
bile di Macintosh 

Teleport differisce anche dal Mini- 
Finder poiché permette di passare da 
un'applicazione a un'altra, che non ri¬ 
siede sullo stesso disco, anche se Te¬ 
leport non si trova su quel particola¬ 
re disco; si può uscire da un pro¬ 
gramma e tornare al Finder semplice- 
mente scegliendo l'opzione Quit, 
senza altre particolari scelte. 

Con questo programma non si ve¬ 
dono icone, ma si selezionano i file 
da una semplice finestra di dialogo. 


MockChart 

Questo è uno degli accessori più u- 
tili che si trovino in commercio. 

Scritto da uno dei veterani della 
programmazione mondiale, Donald 
Brown, e commercializzato dalla CE 
Software, MockChart è un generato¬ 
re di grafici estremamente flessibile 
e facile da usare (figura 5) che fa 
parte della grande famiglia MockAp¬ 
plication: infatti della stessa serie si 
trovano anche MockTerminal, Mock- 
Print e MockWrite. MockChart è in 
grado di creare grafici di 5 tipi diver¬ 
si: linee, colonne, colonne sovrappo¬ 
ste, aree e torte. E' possibile passare 
da un formato a un altro in maniera 
rapida e semplice, in modo da vedere 
una diversa rappresentazione grafica 
dei propri dati. Gli assi vengono co¬ 
struiti in scala e denominati in mo¬ 
do automatico, e si possono sceglie¬ 
re gli sfondi per riempire i grafici. 
Con MockChart si possono creare e 
incollare grafici nei documenti da 
stampare; per esempio, supponendo 
di dover preparare con un qualsiasi 
word processor un report sull'anda¬ 


mento delle vendite consuntive per 
quest'anno e previste per l'anno pros¬ 
simo, basta aprire MockChart dal 
menù mela, copiare i dati dalla rela¬ 
zione, incollarli sulla sua tabella e 
decidere quale tipo di grafico si vuo¬ 
le scegliere; una volta effettuata la 
scelta, si possono aggiungere note, 
titoli o scritte a piacere; infine basta 
scegliere la grandezza voluta del gra¬ 
fico e, attraverso la funzione Copia 
e Incolla, riportarlo così costruito al¬ 
l'interno dei report che si stava scri¬ 
vendo. Il grafico può essere stampa¬ 
to direttamente da MockChart, oppu¬ 
re copiato alfinterno dell'archivio ap¬ 
punti per essere utilizzato successiva¬ 
mente su un'altra applicazione. Mo¬ 
ckChart occupa 17K, quindi lo si 
utilizza bene con almeno 512K di 
memoria; si può lavorare però anche 
con un Mac da 128K, a patto di crea¬ 
re documenti non troppo lunghi. E’ 
estremamente facile da usare. 

MockTerminal 

Come MockChart, anche Mock¬ 
Terminal è un accessorio molto uti- 
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I MockTerminal I 


by Donald Browi 


1984,, 1985 CE Software 


MockTerminoI is being mode avaiI ab I e under 
thè MacHonor System Please give this to 
everyone you know If you ehoose to keep it, 
please send $25 00 for thè Iicenses to 
MoekTerm i na I, MockUr i te , and MockF'r i ri ter 
($30.00 for Iicenses plus most recent uersions 
and documen ta t. i on on d i sk ;■ to 

CE Software 
801 73rd Street 
Des tloines, Ifi 50312 
515-224-1995 
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Diai 

Hang up 


Start Recording... 
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Rbout MockTerminal 
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Command'l 


Figura 6. 
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Comunicazioni 


Da: RLFONSO 

Alle ore 2:26 di Lun. 7 lug 1986 
Soggetto: 


Messaggio: 


[Spedisci] 

[ Annulla] 


1 me... ] 


Meeting con Apple 


Ti pregherei di uoler prenotare 4 posti al 
ristorante La Pergola, perle ore 15.00. 
Poi comunica a Gabriele che il meeting 
con Apple comincia alle ore 14.50 


Nessun File Collegato 


■ 


I 4 t 

■ir V'V A 

Mf 


V ? r 


Figura 7. 
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Disco Sistema 1 


5 elementi 

476K su disco 304K disponibili 



Elenco dei Messaggi 


a 


Messaggi per : RLFONSO 


Meeting Apple 

—r 

Incontro con Gabriele’ 


Telefonata Jsoft 

J 

Telefonata Italmare 


Meeting Sperry 


Incontro con Bocchiola 


Incontro con Radici 




Figura 8. 
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le ed estremamente tacile da usare. 
Scritto anch’esso da Donald Brown, 
consente di trasmettere o ricevere da¬ 
ti da altri computer o banche dati col¬ 
legati via modem al Macintosh, sen¬ 
za dover abbandonare quello che si 
sta facendo, ma semplicemente atti¬ 
vando la relativa opzione sotto il me¬ 
nù mela. Può trasmettere a 300, 
I 200 e 2400 baud, e fra le sue carat¬ 
teristiche più importanti ce la possi¬ 
bilità di chiamata automatica; è in 
grado infine di riconoscere e quindi 
trasmettere con i protocolli Xmo¬ 
dem e MacBinary, sia in Haif sia in 
Full Duplex (figura 6). 

Ovviamente i messaggi in arrivo 
possono essere registrati su dischet¬ 
to, così come si possono spedire 
messaggi presenti su dischetto sem¬ 
plicemente scegliendoli dalla finestra 
di dialogo che viene attivata dall'op¬ 
zione Send. Come MockChart, an¬ 
che MockTenninal non è protetto. 

Quick and Dirty Filer 

Quesfaccessorioècommercializza- 
to dalla Dreams of thè Phoenix. Per¬ 
mette di compiere varie operazioni 
senza uscire dal Finder; possiede set¬ 
te operazioni: goto, print, copy, 
renarne, delete, get info, available. 

Tutte queste funzioni di Q&D Fi¬ 
ler sono compatibili sia col vecchio 
System MFS sia col nuovo HFS. 


Le prime due, GOTO e PRINT, 
sono semplici implementazioni sen¬ 
za utilizzo pratico, in quanto la vera 
essenza di Q&D Filer risiede nelle 
funzioni in grado di manipolare i fi¬ 
le. Il GOTO è una semplice funzio¬ 
ne di lancio di un'applicazione, me¬ 
no sofisticato di Teleport, ed è in 
grado di lavorare solo con il System 
MFS, mentre non funziona con il 
nuovo HFS; il PRINT stampa sola¬ 
mente file di testo ed è simile alla 
funzione ReadiPrinter del Sidekick, 
ma non ha funzioni di formattazione 
della stampa da eseguire. 

Il Copy permette di copiare file 
sia sullo stesso disco sia su un al¬ 
tro; questa funzione risulta utile 
quando si vuole creare spazio sul di¬ 
sco di lavoro, copiando uno o due fi¬ 
le su un altro dischetto, e cancellan¬ 
doli dal vecchio, senza dover uscire 
dal Finder. Un altro uso del COPY è 
quello di copiare file, contenuti in li¬ 
velli bassi di cartelle, nel disco rigi¬ 
do HD20 Apple portandoli al livello 
più alto della scrivania; questo per¬ 
ché molti programmi non sono in 
grado di lavorare con HFS e quindi 
di trovare i file contenuti in più car¬ 
telle. 

Il RENAME permette di dare un 
nuovo nome ai file; quando si sta 
creando un nuovo documento, 
poiché è conveniente conservare la 
vecchia versione, basta darle il 


nuovo nome con Q&D Filer senza 
dover uscire dal lavoro che si sta ese¬ 
guendo. Il DELETE permette di can¬ 
cellare dei file contenuti su disco 
mentre si sta lavorando su un appli¬ 
cativo, semplicemente attivando que¬ 
sta funzione dal menù mela. 

GET INFO fornisce a video tutta 
una serie di informazioni utili, qua¬ 
li: il volume di residenza, il nome 
del file, le sue dimensioni, di che ti¬ 
po è, la data delle modifiche e il crea¬ 
tor. Infine AVAILABLE fornisce in¬ 
formazioni sullo spazio disponibile 
sul dischetto di lavoro e della memo¬ 
ria di Macintosh. 

TopMail 

E' uno dei pochi accessori di scri¬ 
vania dedicato alla rete AppleTalk e 
consente di creare un servizio di po¬ 
sta elettronica all'interno di una rete 
di Macintosh collegati in Apple¬ 
Talk. Il programma è composto di 
due parti: l'installer che si occupa di 
installare le risorse della posta elet¬ 
tronica e del nome dell'utente (che i- 
dentificherà il suo Macintosh) come 
accessorio di scrivania, e il mailser- 
ve che si occupa di smistare i messa- 
gi inviati a uno o più utenti; per far 
ciò tuttavia è consigliato l’uso di un 
disco rigido, collegato sempre in re¬ 
te AppleTalk. 

Una volta installato, spedire un 
messaggio è molto semplice: infatti 
attivata l’opzione TopMail sotto il 
menù mela, compare una finestra di 
dialogo in cui viene indicato chi spe¬ 
disce, chi riceve, il soggetto, il testo 
del messaggio scritto al momento, e 
l’ora e il giorno in cui è stato spedi¬ 
to (figura 7). A questo punto basta 
un click sul bottone spedisci, e l'u¬ 
tente a cui è diretto il messaggio ver¬ 
rà avvisato del messaggio in arrivo 
la prima volta che a sua volta attive¬ 
rà la voce TopMail nel menù mela 
da una finestra di dialogo come 
quella visibile in figura 8. 

I punti di forza di quest'applicativo 
sono la possibilità di col legare a un 
messaggio da spedire un documento 
di qualsiasi tipo, un file di dati o ad¬ 
dirittura un programma vero e pro¬ 
prio, e il fatto che tutto viene gesti¬ 
to in background, ovvero in maniera 
del tutto trasparente per gli utenti: 
infatti lo smistamento dei messaggi 
si verifica in modo da non distoglie¬ 
re e non interferire con il normale la¬ 
voro. 

Alfonso Scoppetta 
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Con il mouse, il joystick o la tastiera potete utilizzare splendide icone e 
creare film d'animazione in Hi-Res. Con un breve programma separato di 
proiezione potete poi visionare il vostro cortometraggio. 


Clic si gira 


Movie Construction Set crea un'in¬ 
terfaccia utente molto simile a quel¬ 
la del Macintosh: invece di impiega¬ 
re complessi comandi e menù si fa 
uso di icone per creare grafica in alta 
risoluzione. Il programma combina 
linguaggio macchina e routine in 
Applesoft per realizzare un'anima¬ 
zione veloce e scorrevole. L'Apple 
Ile, o il Ile con scheda 80 colonne 
espansa, può memorizzare film più 
lunghi nei 64K supplementari. 

Potete ricorrere al joystick o al 
mouse per l'input, usare i tasti di 
controllo per dare comandi che abbre¬ 
viano le operazioni e comandare il 
cursore dalla tastiera per lavorare sen¬ 
za mouse o joystick. Per adoperare 
il mouse con il II Plus o il Ile lo si 
deve inserire nello slot 4. 

Come si usa 
il programma 

Copiate il programma in Apple¬ 
soft del listato 1 e salvatelo sul di¬ 
schetto con il nome di MCS. Acce¬ 
dete al Monitor con CALL -151, co¬ 
piate il codice esadccimale del lista¬ 
to 2 e salvatelo sul dischetto con il 
comando: 

BSAVE MCS.BIN,A$800,L$852 

Copiate il listato 3 e salvatelo 
con il nome di MCS.PROJECTOR. 
Per un aiuto nell'introduzione dei li¬ 
stati di Applicando consultate la ru¬ 
brica Per chi comincia in questo nu¬ 
mero della rivista. 

Per avviare il programma battete 


RUN MCS. La pagina d'intestazio¬ 
ne vi invita a scegliere 1, 2 o 3 per 
specificare se l'input è da joystick, 
da mouse o da tastiera. Poi vi viene 
chiesto di specificare la capacità del¬ 
la memoria del vostro sistema. Se 
avete un Apple II, II Plus o Ile, 48 
o 64K, scegliete l'opzione 1. Se ave¬ 
te un Ile con scheda 80 colonne 
espansa o un Apple Ile scegliete l'op¬ 
zione 2. 

Quando avete selezionato metodo 


di input e configurazione di memo¬ 
ria compare la schermata principale 
di Movie Construction Set (figura 
1). 

Per rappresentare le operazioni che 
potete eseguire vengono usate delle 
icone. Si seleziona un'icona spostan¬ 
dovi sopra la freccia e facendo clic 
con il mouse, il pulsante del jo¬ 
ystick o la barra spaziatrice, a secon¬ 
da dell’opzione di input che avete 
scelto. Le icone sono numerate, e le 





Figura 1. Schermata principale di Movia Construction Set. 
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loro funzioni sono indicate nella ta¬ 
vola 1. Alcune delle operazioni ri¬ 
chiedono però un'ulteriore spiegazio¬ 
ne: le opzioni taglia e incolla, il me¬ 
nù di editing e il menù del file rap¬ 
presentano ognuno funzioni com¬ 
plesse. 

• Taglia e incolla. Qui il con¬ 
cetto chiave è il Clipboard, un'area 
della memoria utilizzata per conser¬ 
vare provvisoriamente un fotogram¬ 
ma. I fotogrammi sono messi sul 
Clipboard con due operazioni. L'ope¬ 
razione di taglio, rappresentata dall'i¬ 
cona 4 della tavola 1, toglie dalla 
pellicola il fotogramma corrente, 
chiude lo spazio rimasto vuoto nella 
sequenza del film e mette sul Cli¬ 
pboard una copia del fotogramma ta¬ 
gliato via. L'operazione di copiatura, 
rappresentata dall'icona 5, mette an- 
ch'essa sul Portablocco una copia 
del fotogramma corrente, ma lascia 
intatta la pellicola. 

Esistono tre tipi diversi di opera¬ 
zione d’incollaggio. Incolla-inscri- 
sci, rappresentato dall'icona 6 della 
tavola 1, prende l'immagine che si 
trova attualmente sul Clipboard e la 
inserisce prima del fotogramma cor¬ 
rente, spostando in là i fotogrammi 
successivi per farle posto. Incolla- 
combina, rappresentato dall'icona 7, 
combina il fotogramma del Clip¬ 
board con quello corrente. Incolla so¬ 
pra, rappresentato dall'icona 7, can¬ 
cella il fotogramma corrente e lo so¬ 
stituisce con il fotogramma del Clip¬ 
board. 

Non c'è modo alcuno di osservare 
direttamente che cosa c'è sul Clip¬ 
board. Il miglior modo per scoprire 
che cosa ci sia consiste nel farne una 
copia su un fotogramma inutilizza¬ 
to. La sola maniera per togliere 
un'immagine dal Clipboard consiste 
nel sostituirla con qualcos'altro me¬ 
diante le operazioni di taglio e copia¬ 
tura. 

• Il menù di editing. Facendo 
clic sull'icona del pezzo di pellicola 
si visualizza un menù di quattro 
opzioni. L'opzione 1, velocità del 
film , permette di controllare la velo¬ 
cità alla quale il film viene proietta¬ 
to. L'opzione 2, ripeti, fa sì che il 
film ricominci quando arriva alla fi¬ 
ne. Premendo 2 si commuta questa 
opzione da S a N e viceversa. Per fer¬ 
mare un film che è in fase di ripeti¬ 
zione premete il tasto <ESC>. Il 
film girerà fino alla fine (o all'inizio 
se la proiezione è all’indietro) e si 
fermerà. 


Listato 1. Movie Construction 

DOS 3.3 

10 REM - 

ProDOS 

20 REM MOVIE CONSTRUCTION 

30 REM DI MIKE LINKOVICH 

40 REM COPYRIGHT (C) 1986 

Apple Ile 

Apple Ile 


60 

70 

80 

90 

100 

110 

120 

130 

140 

150 

*T60 

170 

180 

190 

200 

210 

220 

230 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 


MICROSPARC, INC 


REM 
REM 

IF PEEK (104) < > 16 Th'EN POKE 103, 129: POKE 104,16: POKE 

224,0: PRINT CHR$ (4)"RUN MCS" 

PRINT CHR$ (4)"BLOAD MCS.BIN" 

LOWMEM = 97: IF PEEK (48896) < > 76 THEN HIMEM: 16384 

GOSUB 2550: XDRAW S AT X,Y 
XDRAW OS AT OX,OY: XDRAW S AT X,Y 
OX = X :OY = Y: OS = S 

S = 1: IF X > 10 AND Y > 10 AND X < 176 AND Y < 176 THEN S 
TL 

IF CT = 3 THEN GET A$:K = ASC (AS): IF K 
CALL BEEP: GOTO 150 
GOSUB 2350: IF BT THEN GOSUB 180 
ON (CT = 3) GOTO 120: GOTO 160 
BT = 0: IF S < > TL THEN 210 

XDRAW OS AT OX,OY: XDRAW 4 AT 
NT ( (Y - 10) / 4) * 4 + 10 
XDRAW OS AT OX,OY: XDRAW 5 AT 
+ 10: RETURN 

210 OR Y 


-Uè 


3 OR K = 4 THEN 


INT ( (X - 10) / 4) 


10, I 


(X 


10) / 4 + 231, (Y - 10) / 4 


AIO 

430 


440 

450 

460 

470 
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490 
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510 
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530 

540 

550 

560 

570 

580 

590 

600 

610 

620 

630 

640 

650 

660 

670 
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690 


700 


IF X < 210 OR Y < 70 OR Y > 81 OR X > 266 THEN 280 

IF X < 228 THEN HR = 31:HL = 30:GF = 1 

IF X < 249 AND X > 227 THEN HR = 34:HL = 33:GF = 2 

IF X < 266 AND X > 248 THEN HR = 37:HL = 36:GF = 3 

POKE 251,14: POKE DRW + 1,56: POKE 252,70: POKE 253,81: POKE 

254,HR: POKE 255,HL: CALL DRW 

ON GF GOSUB 1300,1530,1540 

POKE 251,14: POKE DRW + 1,56: POKE 252,70: POKE 253,81: POKE 
254,HR: POKE 255,HL: CALL DRW 

IF X < 210 OR X > 265 OR Y < 85 OR Y > 96 THEN 360 

IF X < 228 THEN HR = 31:HL = 30:GF = 1 

IF X < 249 AND X > 227 THEN HR = 34:HL = 33:GF = 2 

IF X > 248 THEN HR = 37:HL = 36:GF = 3 

POKE 251,14: POKE DRW + 1,56: POKE 252,85: POKE 253,96: POKE 
254,HR: POKE 255,HL 

CALL DRW: ON GF GOSUB 1720,1770,800 

POKE 254,HR: POKE 255,HL: POKE 251,14: POKE DRW + 1,56: POKE 

252,85: POKE 253,96: CALL DRW 

RETURN 

IF X < 210 OR X > 244 OR Y < 100 OR Y > 111 THEN 420 
IF X < 228 THEN HR = 31:HL = 30:GF = 1 

IF X > 227 THEN HR = 34:HL = 33:GF = 2 

POKE 251,14: POKE DRW > 1,56: POKE 252,100: POKE 253,111: POK 
E 254,HR: POKE 255,HL: CALL DRW: ON GF GOSUB 1810,1090 
IF HR THEN POKE 251,14: POKE DRW + 1,56: POKE 252,100: POKE 
253,111: POKE 254,HR: POKE 255,HL: CALL DRW 
RETURN 

IF X < 252 OR X > 265 OR Y < 100 OR Y > 111 THEN 480 

POKE 251,14: POKE DRW + 1,56: POKE 252,100: POKE 253,111: POK 

E 254,37: POKE 255,36: CALL DRW 

TL = NOT (TL - 2) +2: HCOLOR= 3 * (TL = 2) +4 

XDRAW 2 + (TL = 2) AT 255 + 3 * (TL = 2),102 + 3 * (TL = 2): 

XDRAW TL AT 255 + 3 * (TL = 3),102 + 3 * (TL = 3) 

POKE 757,37: IF TL = 3 THEN POKE 757,51 

POKE 251,14: POKE DRW + 1,56: POKE 252,100: POKE 253,111: POK 

E 254,37: POKE 255,36: CALL DRW: RETURN 

IF X < 203 OR X > 217 OR Y < 5 OR Y > 56 THEN RETURN 

IF Y < 18 THEN POKE 252,5: POKE 253,16:G = 1 

IF Y > 17 AND Y < 46 THEN RETURN 

IF Y > 45 THEN POKE 252,45: POKE 253,56:G = 2 

POKE 251,14: POKE DRW + 1,56: POKE 254,30: POKE 255,29 

CALL DRW: FOR D = 1 TO 40: NEXT D: CALL DRW 

IF (AD = LOWMEM + 1 AND G = 1) OR (AD » MX AND G = 2) THEN C 

ALL BEEP: ON ( PEEK ( - 16286) > 127) 

POKE 252,10: POKE 253,51: POKE 254,38 
+ 1 THEN POKE 251,AD 
IF AD > B THEN POKE 251,LOWMEM 
CALL SCAN: IF AD > B THEN GOSUB 690 
IF G » 1 THEN AD = AD - 1 
IF G = 2 THEN AD ® AD + 1 
IF AM < AD THEN AM = AD 
IF AD > B THEN GOSUB 700 
POKE MD, 234 : POKE MD + 1,234 
GOSUB 720: IF AD > B THEN POKE 251,LOWMEM 

POKE 252,10: POKE 253,51: POKE 254,38: POKE 255,33: POKE DRW 
+ 1,0: IF AD < B + 1 THEN POKE 251,AD 

TfiT T DDW 

POKE MD,81 : POKE MD + 1,38 

IF PEEK ( - 16286) > 127 AND AD < AM AND LN$ < > "!" THEN 

ON CT GOTO 480,480,540 

CALL XFR: HCOLOR= 3 * (TL - 2) +4: RETURN 

POKE 60,0: POKE 61,LOWMEM: POKE 62,255: POKE 63,LOWMEM: POKE 
66,0: POKE 67,AD - (MAXMEM - 7): POKE AUXMV,56: CALL AUXMV: R 
ETURN : REM P->A 

POKE 60,0: POKE 61,AD - (MAXMEM - 7): POKE 62,255 : POKE 63, AD 


GOTO 680: RETURN 
: POKE 255,33: IF AD < 


B 


20 













- (MAXMEM - 7): POKE 66,0: POKE 67,LOWMEM: POKE AUXMV,24 : CA 
LL AUXMV: RETURN : REM A->P 
710 REM — N. FOTOGRAMMA 

720 AD$ = STR3 (AD - LOWMEM): IF LEN (AD$) < 3 THEN AD$ = "0" + 
AD$: IF LEN (ADS) < 3 THEN AD$ = "0" + AD$ 

730 FOR C = 1 TO 3: POKE 251,14: POKE 252,27: POKE 253,33: POKE 2 

54,27 + C: POKE 255,27 + C: POKE DRW + 1, VAL ( MID$ (AD$,C,1 

)) *7+90: CALL DRW: NEXT 
740 RETURN 

750 HOME : FOR C = 6 TO 34: VTAB 6: HTAB C: PRINT US: VTAB 19: HT 
AB C: PRINT US: NEXT : FOR C = 7 TO 19: VTAB C: HTAB 5: PRINT 
LNS;: HTAB 35: PRINT LNS: NEXT : POKE 33,26: POKE 32,7: POKE 
34,6: POKE 35,18 : RETURN 
760 AC = 512 :A$ = "" 

770 IF PEEK (AC) = 141 THEN RETURN : REM <CR> 

780 IF PEEK (AC) < 160 THEN AC = AC + 1: GOTO 770 

790 A$ = A$ + CHRS ( PEEK (AC) - 128) :AC = AC + 1 : GOTO 770 

800 GOSUB 750: POKE - 16300,0: POKE - 16303,0 

810 HOME : INVERSE : VTAB 8: PRINT " MENU DI EDITING ": NORMAL 
320 VTAB 10: PRINT "(1) VELOCITA' FILM (";256 - DL;")" 

830 VTAB 11: PRINT "(2) RIPETIZIONE(";: IF RP = 1 THEN PRINT "S" 


840 

850 

860 

870 

880 

890 

900 

910 

920 

930 

940 

950 


960 

970 

980 

990 

1000 

1010 

1020 
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1040 

1050 

1060 

1070 

1080 

1090 

1100 

1110 

1120 

1130 

1140 

1150 

1160 

1170 

1180 

1190 

1200 

1210 

1220 

1230 

1240 

1250 

1260 

1270 

1280 

1290 

1300 

1310 

1320 

1330 

1340 

1350 


IF RP - 0 THEN PRINT "N"; 

PRINT ")" 

VTAB 12: PRINT "(3) N. FOTOGRAMMA..." 

VTAB 13: PRINT "(4) DIREZIONE (";': IF NOT DN THEN PRINT "> 

) " 

IF DN THEN PRINT "<)" 

VTAB 15: PRINT "ESC ESCI" 

VTAB 18: PRINT "SCEGLI UN NUMERO- "; 

GET A$: IF A$ < > ESCS AND (A$ < "1" OR A$ > "4") THEN CALL 

BEEP: GOTO 910 

IF A$ - ESCS THEN TEXT : POKE - 16304,0: POKE - 16299,0: H 
OME : RETURN 

ON VAL (A$) GOSUB 940,970,980,1080: GOTO 810 
VTAB 18: HTAB 1: PRINT "VELOCITA 1 FILM(1-255)-"; 

POKE 255,3: CALL INPT: GOSUB 760: ON (A$ = "") GOTO 960: ON ( 

VAL (A$) < 1 OR VAL (A$) > 255) GOTO 940:DL - 256 - VAL (A 

$> 

RETURN 

RP = NOT RP: RETURN 

VTAB 18: HTAB 1: PRINT "N. FOTOGRAMMA (1-";AM - LOWMEM;") - " 

;: POKE 255, LEN ( STRS (AM - LOWMEM)): CALL INPT: GOSUB 760 
IF A$ = "" THEN RETURN 

IF VAL (A$) < 1 OR VAL (A$) > AM - LOWMEM THEN CALL BEEP: 

GOTO 980 

POKE 251, (AD < B + 1) * AD : POKE 252,10: POKE 253, 51 : POKE 2 
54,38: POKE 255,33: IF AD > B THEN POKE 251,LOWMEM 
CALL SCAN: IF AD > B THEN GOSUB 690 

AD = VAL (A$) + LOWMEM: TEXT : POKE - 16304,0: POKE - 162 
99,0: HOME : POKE DRW + 1,0: POKE MD,234: POKE MD + 1,234 
IF AD > B THEN GOSUB 700: POKE 251,LOWMEM: GOTO 1060 
POKE 251,AD 

POKE 252,10: POKE 253,51: POKE 254,38: POKE 255,33: CALL DRW 

: CALL XFR: HCOLOR- 3 * (TL = 2) +4 

GOSUB 720: POKE MD,81: POKE MD + 1,38: POP : RETURN 

DN = NOT DN: RETURN 

POKE DRW + 1,0: POKE 252,10: POKE 253,51: POKE 254,38: POKE 
255,33 

IF AD < B + 1 THEN POKE 251,AD 

IF AD > B THEN POKE 251,LOWMEM 

CALL SCAN: IF AD > B THEN GOSUB 690 

POKE 252,10: POKE 253,51: POKE 254,38: POKE 255,33 

POKE MD, 234 : POKE MD + 1,234 

IF DN THEN 1210 

POKE 751,LOWMEM + 1: POKE 764,8: POKE 765,DL: POKE 759,0: IF 
AM > B THEN POKE 759,AM - (MAXMEM - 8): POKE 750,B + 1 
POKE PZ,96 : POKE PZ - 11,238: IF AM < B + 1 THEN POKE 750,A 
M + 1 

CALL PLAYER: REM ROUTINE DI PROIEZIONE 

IF PEEK ( - 16384) = 155 THEN POKE - 16368,0: GOTO 1270 

ON RP GOTO 1160: GOTO 1270 

POKE 765,DL: POKE 759,0: POKE 750,LOWMEM: IF AM < B + 1 THEN 
POKE 751,AM 

IF AM > B THEN POKE 751,B: POKE 759,7: POKE 764,AM - (MAXME 
M - 7) 

POKE PZ - 11,206: POKE PZ,234: IF AM < B + 1 THEN CALL PZ + 

1 

IF AM > B THEN CALL PZ - 54: REM PSKIP(ROUTINE DI PROIEZIO. 

NE) 

IF PEEK ( - 16384) - 155 THEN POKE - 16368,0: GOTO 1270 

IF RP THEN 1210 

IF AD > B THEN POKE 251,LOWMEM: GOSUB 700 

IF AD < B + 1 THEN POKE 251,AD 

CALL DRW: POKE MD,81: POKE MD + 1,38: RETURN 

POKE 251,96: POKE 252,10: POKE 253,51: POKE 254,38: POKE 255 

,33: CALL SCAN 

IF AD - AM THEN AD - AD - (AD > LOWMEM + 1): GOTO 1430 

G - AD: FOR C » AD + 1 TO AM 

IF C > B THEN 1380 

POKE 60,0: POKE 61,C . 

POKE 62, 255: POKE 63,C (C OMinUCl) 
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1360 

1370 

1380 

1390 

1400 

1410 

1420 

1430 

1440 

1450 

1460 

1470 

1480 

1490 

1500 

1510 

1520 

1530 

1540 

1550 


POKE 66,0: POKE 67,C - 1: CALL MOVE 

NEXT : GOTO 1430 

IF C = B + 1 THEN 1400 

AD = C: GOSUB 700:AD - C - 1: GOSUB 690: NEXT : AD = G: GOTO 
1430 

AD = B + 1: GOSUB 700: POKE 60,0: POKE 61,LOWMEM 

POKE 62,255: POKE 63,LOWMEM: POKE 66,0: POKE 67,B: CALL MOVE 

GOTO 1370 

POKE 252,140: POKE 253,181: IF AM < B + 1 THEN POKE 251,AM 
IF AM > B THEN POKE 251,LOWMEM 

CALL SCAN: IF AM > B THEN G = AD:AD « AM: GOSUB 690 
POKE 252,10: POKE 253,51 
IF AM > B THEN AD = G 
AM = AM - (AM > LOWMEM + 1) 

POKE MD, 234 : POKE MD + 1, 234 : POKE DRW + 1,0: IF AD < B + 1 
THEN POKE 251,AD 

IF AD > B THEN GOSUB 700: POKE 251,LOWMEM 
CALL DRW: GOSUB 720: POKE MD,81 : POKE MD + 1,38 
CALL XFR: HCOLOR= 3 * (TL = 2) +4: RETURN 

POKE 251,96: POKE 252,10: POKE 253,51: POKE 254,38: POKE 255 
,33: CALL SCAN: RETURN 
IF AM < MX THEN 1590 

CALL BEEP: CALL BEEP: TEXT : HOME : VTAB 10: PRINT "MEMORIA 
ESAURITA -- VUOI ELIMINARE L* ULTIMO FOTOGRAMMA? (S/N) - 


1560 GET A3: IF A3 < > "S" AND A3 < > "N" AND A3 < > ESCS THEN 

CALL BEEP: GOTO 1560 

1570 POKE - 16299,0: POKE - 16304,0: IF A3 = ESC3 OR A3 = "N" T 
HEN RETURN 

1580 AM = AM - (AM > LOWMEM + 1) 

1590 G = AD: FOR C = AM TO G STEP - 1 
1600 IF C > B - 1 THEN 1640 
1610 POKE 60,0: POKE 61, C 

1620 POKE 62,255: POKE 63,C: POKE 66,0: POKE 67,C + 1 
1630 CALL MOVE: NEXT : GOTO 1670 

1640 ON (C = B) GOTO 1650:AD = C: GOSUB 700: AD = C + 1: GOSUB 690 
: NEXT : GOTO 1670 

1650 POKE 60,0: POKE 61,B: POKE 62,255: POKE 63,B: POKE 66,0: POK 
E 67,LOWMEM: CALL MOVE 
1660 AD = B + 1: GOSUB 690: NEXT 
1670 AD - G: POKE MD,234: POKE MD + 1,234 

1680 POKE 251,96: POKE DRW + 1,0: POKE 252,10: POKE 253,51: POKE 
254,38: POKE 255,33: CALL DRW 
1690 POKE MD,81 : POKE MD + 1,38 

1700 CALL XFR: HCOLOR= 3 * (TL = 2) + 4 : AM = AM + (AM < MX) 

1710 RETURN 

1720 POKE 251,96: POKE DRW + 1,0 

1730 POKE 252,10: POKE 253,51: POKE 254,38: POKE 255,33 

1740 POKE MD,1 7 : CALL DRW: POKE MD,81 

1750 CALL XFR: HCOLOR= 3 * (TL « 2) +4: RETURN 

1760 REM === INCOLLA-SOSTITUÌSCE 

177.0 , POKE 251,96: POKE DRW + 1,0 

1780 POKE 252,10: POKE 253,51: POKE 254,38: POKE 255,33 
1790 POKE MD, 234 : POKE MD + 1,234: CALL DRW: POKE MD,81: POKE MD 
+ 1,38 

1800 CALL XFR: HCOLOR= 3 * (TL = 2) +4: RETURN 

1810 POKE 251,(AD < B + 1) * AD: POKE 252,10: POKE 253,51: POKE 2 
54,38: POKE 255,33: IF AD > B THEN POKE 251, LOWMEM 
1820 CALL SCAN: IF AD > B THEN GOSUB 690 
1830 HOME : GOSUB 750 

1840 HOME : INVERSE : VTAB 8: PRINT " MENU ARCHIVIO ": NORM 

AL : IF FQ THEN AM = LOWMEM + 1 :FQ * 0 
1850 VTAB 10: IF AM > LOWMEM + 1 THEN PRINT " ( )"; 

1860 IF AM = LOWMEM + 1 THEN PRINT "(1)"; 

1870 PRINT " CARICA..." 

1880 VTAB 11: PRINT "(2) SALVA CON IL NOME...": PRINT "(3) NUOVO 
FILM": PRINT "(4) DRIVE (";DV;")": PRINT "(5) FINE" 

1890 VTAB 16: PRINT "ESC ESCI" 

1900 POKE - 16300,0: POKE - 16303,0: VTAB 18: PRINT "SCEGLI UN 
NUMERO - "; 

1910 GET A$: G = VAL (AS) : IF (G < 1 OR G > 5) AND A$ < > ESCS O 

R G = 1 AND AM > LOWMEM + 1 THEN CALL BEEP: GOTO 1910 

1920 IF G < >4 THEN TEXT : HOME 

1930 IF G > 2 THEN 2020 
1940 IF A$ = ESCS THEN 2030 

1950 VTAB 22: HTAB 3: PRINT "NOME DEL FILE - FLM."; : POKE 255, 21 : 

CALL INPT: GOSUB 760:F$ = AS 
1960 IF LEN (F$) = 0 THEN 1810 

1970 IF LEFTS (F$,l) < > "?" THEN GOTO 2010 

1980 POKE 35,21: HOME : PRINT : IF PEEK (48896) = 76 THEN PRINT 
D$"CAT,D";DV: GOTO 2000 
1990 PRINT D$"CATALOG,D";DV 
2000 POKE 35,24: GOTO 1950 
2010 FZ = G 

2020 ON G GOSUB 2040,2160,2260,2300,2310: IF G = 4 THEN qOTO 184 
0 

2030 TEXT : POKE - 16304,0: POKE - 16299,0: HOME : RETURN 
2040 VTAB 23: HTAB 1: PRINT "STO CARICANDO IL FILE... ATTENDI PRE 
GO.": PRINT D$"VERIFY FLM."F$",D"DV: PRINT D$"OPEN FLM."F$: 
PRINT D$"READ FLM."FS 

2050 INPUT G n . . 

2060 IF PEEK (48896) = 76 THEN GOSUB 3200: GOTO 2120 (C Ontinua) 


L’opzione 3, vai a fotogramma , 
permette di visualizzare il fotogram¬ 
ma che si vuole modificare. Invece 
di passare in rassegna tutti i foto¬ 
grammi con le icone a freccia si può 
battere il numero del fotogramma 
desiderato. L'opzione 4, direzione , 
permette di scegliere il verso nel qua¬ 
le la pellicola sarà proiettata. Pre¬ 
mendo 4 si commuta l’opzione fra > 
(in avanti) c < (all’indietro). 

• Il menù del file. Questo me¬ 
nù compare quando si fa clic sull'ico¬ 
na che raffigura un dischetto. Avete 
a disposizione quattro opzioni che si 
spiegano da se. L'opzione carica 
provvede appunto a caricare un film 
in memoria dal dischetto. Battete un 
punto interrogativo (?) e premete 
<RETURN> per visualizzare la dire¬ 
ctory del dischetto. Se avete già un 
film in memoria usate prima l’opzio¬ 
ne nuovo film per pulire la me¬ 
moria. 

L'opzione salva con il nome salva 
il film in memoria sul dischetto. Si 
può ottenere la directory anche da 
questa opzione. L'opzione nuovo 
film pulisce la memoria. Per cancel¬ 
lare un film dalla memoria dovete da¬ 
re conferma di questa opzione per 
completarla, quindi non dovete teme¬ 
re di eliminare accidentalmente un 
film. Notate che per pulire la memo¬ 
ria di un 128K occorre un po’ di tem¬ 
po. Quindi abbiate pazienza. 

L’opzione drive commuta fra drive 
1 e drive 2. Il drive attivo è indicato 
fra parentesi quadre. L'opzione fine 
fa uscire dal programma. Anche in 
ques to caso si deve dare conferma del¬ 
l’opzione per completarla. 

Come si realizza 
un film 

L'azionamento di Movie Constru- 
ction Set c abbastanza semplice. 
Quando avete risposto alle domande 
concernenti il vostro sistema lo 
schermo mostra il display Hi-Rcs di 
figura 1. Nell'angolo in alto a sini¬ 
stra dello schermo si vede una frec¬ 
cia. Potete spostare la freccia con il 
mouse o con il joystick, o mediante 
i tasti I, J, K e M se usate la tastie¬ 
ra; nel caso del Ile e del Ile sono abi¬ 
litati anche i tasti cursore. 

Il grande rettangolo sulla sinfstra 
dello schermo èia finestra di edi¬ 
ting. Portando la freccia nella fine¬ 
stra di editing la si trasforma nel cur¬ 
sore fatto a matita. Premete il pul¬ 
sante del mouse o del joystick o la 
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2070 POKE RE + 18,LOWMEM +1: IFG<B + 2 THEN POKE 751, G 
2080 IF G > B + 1 THEN POKE 751,B + 1 
2090 CALL RE: REM LETTURA DISCO 

2100 ON (G < B + 2 OR MX = B) GOTO 2110: POKE 751,LOWMEM + 1: FOR 
C = B + 1 TO G - 1 : POKE RE + 18,LOWMEM: CALL RE :AD = C: GO 
SUB 690: NEXT 

2110 PRINT : PRINT D3"CLOSE FLM."F$ 

2120 AD = LOWMEM + 1:AM - G - 1: IF AM > MX THEN AM = MX 
2130 ON (CT < > 3) GOSUB 400: POKE DRW + 1,0: POKE 251,AD: POKE 
252,10: POKE 253,51: POKE 254,38: POKE 255,33 
2140 POKE MD, 234 : POKE MD + 1, 234 : CALL DRW: POKE MD,81: POKE MD 
+ 1,38: IF CT = 3 THEN GOSUB 2540 
2150 CALL XFR: HCOLOR= 3 * (TL = 2) +4: RETURN 

2160 VTAB 23: HTAB 1: PRINT "STO SALVANDO IL FILE... ATTENDI PREG 
O.": PRINT : PRINT D$"OPEN FLM."F$",D"DV: PRINT D$"CLOSE FLM 
."F$: PRINT D$"DELETE FLM."F$ : PRINT D$"OPEN FLM."F$: PRINT 
D$"WRITE FLM."F$ 

2170 PRINT AM + 1 

2180 POKE WR + 13,LOWMEM +1: IF AM < B + 1 THEN POKE 751,AM + 1 
2190 IF AM > B THEN POKE 751,B + 1 
2200 CALL WR: REM SCRIVE 
2210 ON (AM < B + 1) GOTO 2230 

2220 POKE 751,LOWMEM + 1: FOR AD = B + 1 TO AMI: POKE WR + 13,LOW 
MEM: GOSUB 700: CALL WR: NEXT 

2230 AD = LOWMEM + 1: GOSUB 720: PRINT : PRINT D$"CLOSE FLM."F$ 
2240 GOSUB 3220: GOSUB 2130 
2250 RETURN 

2260 VTAB 23: HTAB 1: PRINT "CANCELLA MEMORIA; SEI SICURO? (S/N) 

- ";: POKE 255,1: CALL INPT:A$ = CHR$ ( PEEK (512) - 128) 

2270 IF A3 < > "S" AND A3 < > "N" AND A3 < > CHR3 (13) THEN 

CALL BEEP: GOTO 2260 

2280 ON (A3 < > "S") GOTO 2290: GOSUB 2760 

2290 G = 20: RETURN 

2300 DV = NOT (DV - 1) + 1: RETURN 

2310 VTAB 23: HTAB 1: PRINT "FINE - SEI SICURO? (S/N) - ";: POKE 
255,1: CALL INPT:A3 = CHR3 ( PEEK (512) - 128) 

2320 IF A3 < > "S" AND A3 < > "N" AND A3 < > CHRS (13) THEN 

CALL BEEP: GOTO 2310 

2330 IF A3 = "S" THEN TEXT : HOME : END 
2340 RETURN 

2350 G = FRE (9): ON CT GOTO 2360,2370,2380 

2360 CALL CURS:BT = PEEK ( - 16287) > 127:X = PEEK (752) + PEE 
K (753) * 256 :Y = PEEK (754): RETURN : REM CURSORE MOUSE 
2370 CALL CURS:BT = 1:X = PEEK (752) + PEEK (753) * 256:Y = PE 
EK (754): RETURN 


2380 

IF 

K 

« 

8 < 

OR K = 

74 THEN X = X - 4 : IF X 

< 0 THEN X = 

■ 0 

2390 

IF 

K 


21 

OR K 

= 75 THEN X = X + 4: IF 

X > 279 THEN 

X = 279 

2400 

IF 

K 

= 

10 

OR K 

= 77 THEN Y = Y + 4: IF 

Y > 191 THEN 

Y = 191 

2410 

IF 

K 

= 

11 

OR K 

= 73 THEN Y = Y - 4: IF 

Y < 0 THEN Y 

= 0 

2420 

IF 

K 

= 

32 

THEN 

BT - 1 



2430 

IF 

K 

* 

60 

OR K 

= 62 THEN K = K - 16 



2440 

IF 

K 

= 

44 

OR K 

= 46 THEN G = (K = 46) + 

1: GOSUB 2540: GOSUB 


540: 

: GOSUB 2540 



2450 

IF 

K 

= 

5 

THEN 

GOSUB 2540: GOSUB 800: GOSUB 2540 


2460 

IF 

K 

= 

13 

THEN 

GOSUB 1090 



2470 

IF 

K 

= 

22 

THEN 

GOSUB 2540: GOSUB 1530: 

GOSUB 2540 


2480 

IF 

K 

« 

24 

THEN 

GOSUB 2540: GOSUB 1300: 

GOSUB 2540 


2490 

IF 

K 

= 

16 

THEN 

GOSUB 2540: GOSUB 1540: 

GOSUB 2540 


2500 

IF 

K 

= 

20 

THEN 

GOSUB 2540: GOSUB 1720: 

GOSUB 2540 


2510 

IF 

K 

= 

15 

THEN 

GOSUB 2540: GOSUB 1770: 

GOSUB 2540 


2520 

IF 

K 


6 

THEN 

GOSUB 2540: GOSUB 1810: 

IF G < >20 

THEN GO 


SUB 2540 :G = 0 
2530 RETURN 

2540 XDRAW OS AT OX,OY: RETURN 
2550 TEXT : HOME : NORMAL 

2560 MAXMEM = 149: IF PEEK (48896) = 76 THEN MAXMEM = 143 
2570 POKE 8,MAXMEM + 1 
2580 ONERR GOTO 3040 

2590 DRW = 2 94 0 : SCAN = 2990-.XFR = 2263 :BEEP = 3273:MOVE = 3287:CL 
RMEM = 2124 :INPT = 2048 :MD - 2957:RMOUSE = 2649:PRD = 2743:C 
URS = 2 415 :YNIT = 3060:VEC = 3088:WR = 3190:RE = 3228:AUXMV 
- 3268 

2600 PLAYER * 2151:PZ = 2236:FXSTAK = 3307:IMOUSE = 3137:S = l:OS 
- 1 


2610 

2620 

2630 

2640 

2650 

2660 

2670 

2680 

2690 

2700 

2710 


D3 = CHRS (4):ESC3 = CHRS (27):US = CHRS (95):LNS = "!": 

IF PEEK (64435) = 6 THEN LNS = CHRS (124) 

OX = 0 : X = 0 :OY = 0 :Y = 0:DL = 206:TL = 2:DV = 1 
FOR C = 1 TO 40: PRINT US;: NEXT : VTAB 4: HTAB 1: FOR C = 1 
TO 40: PRINT "=";: NEXT : VTAB 3 
PRINT "MOVIE CONSTRUCTION SET-DI MIKE LINKOVICH";: HTAB 3: P 
RINT " (C) 1986 APPLICANDO (. MICROSPARC" ; : POKE 34,5 
GOSUB 750: VTAB 8: INVERSE : PRINT " MENU* DEI COMANDI 
": NORMAL 

VTAB 10: PRINT "(1) JOYSTICK": PRINT "(2) MOUSE": PRINT "(3) 
TASTIERA" 

VTAB 18: PRINT "SCEGLI UN NUMERO - "; 

GET A3 :CT = VAL (A3) : IF CT < 1 OR CT > 3 THEN CALL BEEP: 
GOTO 2680 

IF CT = 1 THEN POKE 2416,183: POKE 2417,10 

IF CT = 2 THEN POKE 2416,89: POKE 2417,10: CALL IMOUSE: REM 
INIZIALIZZA IL MOUSE . . 

FOR C = 752 TO 765: POKE C,0: NEXT : POKE 756, 28 (C OntMUCl) 


barra spaziatrice, a seconda dell’input 
che state usando. Sotto la matita 
compare un blocco di 3 pixel per 3. 
Premete ancora e il blocco scom¬ 
pare. 

Così pure compare e scompare un 
puntino in un riquadro più piccolo, 
nella stessa posizione relativa della 
finestra di editing. Questo piccolo ri¬ 
quadro è il vostro fotogramma. Per 
tracciare una linea spostate il jo¬ 
ystick tenendo premuto il pulsante. 
Nel modo tastiera portate la matita 
sul punto della finestra che volete 
tracciare, poi premete la barra spazia¬ 
trice per fare clic. 

Noterete che la matita serve sia 
per disegnare sia per cancellare, ana¬ 
logamente a quella usata in Mac¬ 
Paint e MouscPaint. Disegna in 
bianco quando partite da un puntino 
nero e in nero quando partite da un 
puntino bianco. La gomma è utile 
per cancellare rapidamente supcrfici 
estese, e cancella sempre lo schermo 
in nero. 

Adesso facciamo un semplice 
film. Con la matita disegnate una li¬ 
nea orizzontale presso la base del fo¬ 
togramma. La chiameremo linea di 
terra. All'orlo sinistro del fotogram¬ 
ma disegnate un cerchio sulla linea 
di terra, a raffigurare una specie di 
ruota. Quando avete disegnato la ruo¬ 
ta sulla strada fate clic sulla cinepre¬ 
sa per copiare il fotogramma sul 
Clipboard, poi avanzate al fotogram¬ 
ma seguente facendo clic sulla frec¬ 
cia in giù. Quando un nuovo foto¬ 
gramma vuoto riempie la finestra di 
editing (per questo occorrono circa 
cinque secondi) fate clic sull'icona di 
incolla sopra o su quella di incolla- 
combina. Qui non usate l'icona in- 
colla-inserisci, perché inserendo un 
fotogramma si spingerebbe il foto¬ 
gramma vuoto in avanti di uno, e co¬ 
sì si sciuperebbe memoria.. 

Quando l'immagine è visualizzata 
nella finestra di editing disegnate 
un'altra ruota sovrapposta alla pri¬ 
ma, ma un poco più avanzata. Non 
preoccupatevi se il cerchio non è per¬ 
fetto, perché un cerchio imperfetto 
dà una migliore illusione ottica di ro¬ 
tazione. Cancellate la prima ruota, 
lasciando solo la nuova. Copiate que¬ 
sto fotogramma, avanzate a quello 
seguente e incollate sopra. Continua¬ 
te a ripetere l'operazione fino a quan¬ 
do la ruota è "rotolata" fino all’estre- 
mità opposta del fotogramma. Quan¬ 
do avete finito fate clic sull’icona 
che raffigura un proiettore, per vede- 
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Dateci un dischetto di Macintosh® con i testi, le immagini, i grafici,... 
che voi stessi avete creato: in breve tempo vi forniremo 
la fotocomposizione (su pellicola o carta fotografica) completa di 
testo ed immagini ad alta risoluzione (ben 2540 linee/pollice). 

E per i vostri manuali, libri, cataloghi, listini, ecc. siamo in grado di 
procedere alla stampa veloce e di qualità. 

Questa pagina è un esempio di ciò che voi stessi potete fare! 



NEWS 







applicando! 


nwrnc di cambiare il di- MockChart 


I Anno 3 - Numero 


Periodico imemo dinforroa/ionc I 


N®wsMft©ir 


SIT 


- Società Italiana Tessuti 


Nel 1985 rilevante crescita delle esportazioni. 

Il 1985 si è concluso all 


Edera d'Oro 
1985. 




viappiani 


Industria Grafica Bruno Viappiani spa 
tecnologie d’avanguardia per stampati di qualità e grandi tirature 

20133 Milano Viale Argonne, 28 
tei. (02) 73.84.341 (5 linee r.a.) - telex 325421 viappi-i 


















































































































Dove comprare 


2720 

2730 

2740 

2750 

2760 

2770 

2780 

2790 

2800 

2810 

2820 

2830 

2840 

2850 

2860 

2870 

2880 

2890 

2900 

2910 

2920 


2930 

2940 

2950 

2960 


2970 

2980 

2990 

3000 

3010 

3020 

3030 

3040 

3050 

3060 

3070 

3080 

3090 

3100 

3110 

3120 

3130 

3140 

3150 

3160 

3170 

3180 

3190 

3200 

3210 

3220 

3230 

3240 

3250 

3260 

3270 

3280 

3290 


HOME : VTAB 8: INVERSE : PRINT " MENU SISTEMA NCRM 

AL 

VTAB 10: PRINT "(1) SISTEMA 48 0 64K": PRINT "(2) SISTEMA 12 
8K" : VTAB 18: PRINT "SCEGLI UN NUMERO - " ; 

GET A3: IF A3 < "1" OR A3 > "2" THEN CALL BEEP: GOTO 2740 
TEXT :FW = 1:B = MAXMEM:MX = MAXMEM: IF A3 = "2" THEN MX = 3 
24 

HCOLOR= 4: HGR2 : HPLOT 0,0: CALL 62454: HCOLOR= 7 
AD = LOWMEM + 1 

CALL 3060: GOSUB 2800: GOSUB 2990: IF FW THEN XDRAW S AT X, 

Y:FW = 0 

RETURN 

HPLOT 8,8 TO 178,8 TO 178,178 TO 8,178 TO 8,8 
HPLOT 7,7 TO 179,7 TO 179,179 TO 7,179 TO 7,7 
HPLOT 5,5 TO 181,5 TO 181,181 TO 5,181 TO 5,5 
POKE 232,16: POKE 233,12: SCALE- 1: ROT= 0 

HPLOT 229,8 TO 274,8 TO 274,53 TO 229,53 TO 229,8: HPLOT 228 

,7 TO 275,7 TO 275,54 TO 228,54 TO 228,7 

HPLOT 226,5 TO 277,5 TO 277,56 TO 226,56 TO 226,5 

POKE 251,14: POKE DRW + 1,0: POKE 252,45: POKE 253,56: POKE 

254,30: POKE 255,29: CALL DRW 

POKE 251,14: POKE DRW + 1,28: POKE 252,5: POKE 253,16: POKE 
254,30: POKE 255,29: CALL DRW 
GOSUB 720 

HPLOT 194,24 TO 218,24 TO 218,36 TO 194,36 TO 194,24 
HPLOT 193,23 TO 219,23 TO 219,37 TO 193,37 TO 193,23 
REM == = UTENSILI RIGA 1 

FOR C = 0 TO 56 STEP 28: POKE 251,13: POKE DRW + 1,C: POKE 2 
52,70 : POKE 253,81 : POKE 254,C / 28 * 3 + 31: POKE 255,C / 2 
8 * 3 + 30: CALL DRW: NEXT 

FOR C = 84 TO 140 STEP 28: POKE 251,13: POKE DRW + 1,C: POKE 
252,85: POKE 253,96: POKE 254,C / 28 * 3 + 22: POKE 255,C / 
28 * 3 + 21: CALL DRW: NEXT 

FOR C - 168 TO 196 STEP 28: POKE 251,13: POKE DRW + 1,C: POK 

E 252,100: POKE 253,111: POKE 254,C / 28 * 3 + 13: POKE 255, 
C/ 28 *3+12: CALL DRW: NEXT 

XDRAW TL AT 255 + 3 * (TL « 3),102 + 3 * (TL = 3) 

FOR C = 68 TO 113 STEP 15: HPLOT 207,C TO 270,C: NEXT : FOR 

C = 207 TO 270 STEP 21: HPLOT C,68 TO C,113: HPLOT C - 1,68 

TO C - 1,113: HPLOT C - 2,68 TO C - 2,113: NEXT 

HPLOT 205,67 TO 270,67: HPLOT 205,114 TO 270,114: HPLOT 203, 

65 TO 272,65 TO 272,116 TO 203,116 TO 203,65 

RETURN 

CALL CLRMEM: IF MX = B THEN 3020 
POKE AUXMV,56 : FOR C = 8 TO 191 

POKE 60,0: POKE 61,96: POKE 62,255: POKE 63,96: POKE 66,0: P 
OKE 67,C: CALL AUXMV: NEXT 

DRAW S AT X,Y:HR = 0:HL = 0: POKE 757,37: IF TL = 3 THEN PO 
KE 757,51 

AD = LOWMEM + 1:AM = LOWMEM + 1: HCOLOR- 7 * (TL = 2): RETUR 
N 

ER = PEEK (222):EL = PEEK (218) + PEEK (219) * 256:FQ = 0 
TEXT : HOME : CALL BEEP: GOSUB 750: INVERSE : VTAB 8: PRINT 
" ERRORE": NORMAL 
CALL - 3288 

IF ER > 15 OR ER = 0 THEN PRINT "ERRORE APPLESOFT ";ER: PRI 
NT "LINEA "; EL: GOTO 3160 

PRINT "ERRORE DOS :": PRINT : IF ER = 4 THEN PRINT "WRITE P 
ROTECTED" 

IF ER = 5 THEN PRINT "I/O ERR" 

IF ER = 6 THEN PRINT "NOT FOUND":FQ = 1 

IF ER = 8 THEN PRINT "CHECK DRIVE" 

IF ER = 9 THEN PRINT "FULL" 

IF ER = 10 THEN PRINT "LOCKED" 

IF ER = 11 THEN PRINT "BAD NAME" 

IF ER = 13 THEN PRINT "TYPE MI SMATCH" 

VTAB 18: PRINT "PREMI <RETURN>"; : GET A3: CALL YNIT 

IF FZ = 1 THEN GOSUB 2760: ON FQ GOSUB 2540:AD = LOWMEM + 1 

: AM = AD + 1: GOTO 2030 

IF ER > 0 AND ER < 14 THEN GOSUB 3220: GOSUB 2130: IF FQ TH 
EN GOSUB 2540 
GOTO 1840 

PRINT D$"CLOSE": IF G > B + 1 THEN GOTO 3240 

PRINT D$"BLOAD FLM."F$",A"(LOWMEM + 1) * 256",B4,E"G * 256", 

TTXT": CALL 4128 

HCOLOR- 4: HGR2 : HPLOT 0,0: CALL 62454: HCOLOR- 7: GOSUB 28 

00: XDRAW S AT X,Y 

RETURN 

PRINT D$"BLCAD FLM."F$",A"(LOWMEM + 1) * 256",B4,E"(B + 1) * 

256", TTXT": CALL 4128 

IF MX = MAXMEM GOTO 3290 
POKE 751,LOWMEM + 1: FOR C - B + 

PRINT D$"BLOAD FLM."F$",A"LOWMEM 
* 256 + 4",L256,TTXT": CALL 4164 
AD = C: GOSUB 69C: NEXT 
AD = LOWMEM + 1: GOTO 3220 


1 TO G - 1 

* 256",B"(C - (LOWMEM + 1)) 


Checksum listato 1 

APPLE CHECKER 3.0 
NOME FILE: MCS 
TIPO: A 

LUNGHEZZA: 2786 
CHECKSUM : BA 


Memorex 

e ritirare l’omaggio 

TORINO 

AREL ELETTRONICA 

Corso Siracusa, 79 - Tel. 011 - 3298580 

ELCONDATA - SOFTWARE HOUSE 

Via Vassalli Eandi, 29 • Tel. 011 - 446085 

ALESSANDRIA 

D0NAD0NI 

Via Bellano, 39 - Castelferro 
Tel. 0131 - 710161/710255 

GENOVA 

ABM COMPUTER 

Piazza De Ferrari, 24/R - Tel. 010 - 294636 

AULLA 

T.A.M. C0MPUTERS 

Via Vittorio Veneto, 17 - Tel. 0187 - 509591 

SAN REMO 

F.C.M. 

Corso Cavallotti, 200 • Tel. 0184 - 883376 

VENTIMIGLIA 

COMPUTER LIFE B. 

Via Trento e Trieste, 1 - Tel. 0184 - 355185 

MILANO 

POLISISTEMI 
Via Derna, 19 

Tel. 02 - 2829917/2842890 

MONZA 

COMPUTERLANDIA 

Via Cortelongo, 115 - Tel. 039 • 386750 
COMPUTERLANDIA 

Via Martiri della Libertà, 72 - Lissone 
Tel. 039 - 461362 

BRESCIA 

IES 

Via Lamarmora, 144/B - Tel. 030 • 344527 

CREMONA 

IL COMPUTER 

Via Pozzi, 13 - Casalmaggiore - Tel. 0375 - 41564 

PIACENZA 

PC PERSONAL COMPUTER 

Via Chiapponi, 42 - Tel. 0523 - 20626 

PARMA 

ZETA INFORMATICA 

Via Emilio Lepido, 6 - Tel. 0521 - 494358 

BOLOGNA 

MINNELLA C0MPUTERS 

Via Mazzini, 146/2 

Tel. 051 - 347420/347512 

FIRENZE 

CENTROGRAF 

Via Reginaldo Giuliani, 146 
Tel. 055 -431793/4378155 . 

AREZZO 

CART0GAMMA 

Via Trasimeno, 33 - Tel. 0575 • 351256 

LIVORNO 

A.S.G. 

Agostini Sistemi Gestione 
Via della Madonna, 87/89 
Tel. 0586 - 27358/31084 

PISA 

BIG BYTE COMPUTER SHOP 
Via Carlo Cattaneo, 88/90 
Tel. 050 - 40786 

PERUGIA 

PUNTO BASIC 

Via Torelli, 77 - Tel. 075 - 45891 

ROMA 

METRO IMPORT 

Via Donatello, 37 

Tel. 06 - 3607600/3608724 

NAPOLI 

CARLO & FABRIZIO SERINO 

Via A. Diaz, 77 - Tel. 081 - 482683 

SASSARI 

AUDIO LINEA 

Via Mameli, 60 - Tel. 079 - 29349 
BASIC SHOP 

Via Tempio, 65/A - Tel. 079 - 275643 
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COMPRAMI 
E TI FARO’ UN REGALO! 

Acquistando due scatole di Flexible Disk MEMOREX puoi chiedere subito 
un omaggio simpatico, originale e utile: 

l’orologio impermeabile sport-time MEMOREX 
con il portamonete da polso. 


è importante scegli 

MEMOREX 

A Burroughs Company 



Autorizzazione Ministeriale in corso adverteam 






re la ruota che scorre sul terreno. 

Se il film è troppo rapido o trop¬ 
po lento fate clic sull'icona dello > 
spezzone di pellicola (o premete 
<CTRL> E) e selezionate l’opzione 
E Introducete una nuova velocità; 
maggiore è il numero più veloce è il 
film. Se volete che la ruota corra nel¬ 
l’altra direzione selezionate l'opzione 
4 per commutare la freccia alfindie- 
tro (<). 

Fatte le modifiche. premete 
<ESC> per tornare alla finestra di 


Listato 2 

800.1051 


0800- A2 

00 

20 

OC 

FD 

C9 

8D 

FO 

0808- 2F 

C9 

9B 

FO 

34 

C9 

88 

DO 

0810- 15 

EO 

00 

FO 

ED 

CA 

20 

ED 

0818- FD 

A9 

AO 

20 

ED 

FD 

A9 

88 

0820- 20 

ED 

FD 

4C 

02 

08 

E4 

FF 

0828- FO 

D8 

C9 

AO 

90 

D4 

9D 

00 

0830- 02 

E8 

20 

ED 

FD 

4C 

02 

08 

0838- 9D 

00 

02 

A9 

00 

9D 

01 

02 

0840- 60 

A9 

8D 

8D 

00 

02 

A9 

00 

0848- 8D 

01 

02 

60 

A9 

60 

8D 

57 

0850- 08 

AO 

00 

A9 

80 

99 

00 

60 

0858- C8 

DO 

F8 

EE 

57 

08 

18 

AD 

0860- 57 

08 

C5 

08 

90 

EB 

60 

AD 

0868- EF 

02 

85 

FB 

20 

7C 

OB 

AD 

0870- FD 

02 

20 

A8 

FC 

EE 

EF 

02 

0878- AD 

EF 

02 

CD 

EE 

02 

DO 

E7 

0880- AD 

F7 

02 

DO 

01 

60 

A9 

00 

0888- 85 

3C 

AD 

FC 

02 

85 

3D 

A9 

0890- FF 

85 

3E 

AD 

FC 

02 

85 

3F 

0898- A9 

00 

85 

42 

A9 

61 

85 

43 

08A0- 18 

20 

11 

C3 

A9 

61 

85 

FB 

08A8- 20 

7 C 

OB 

AD 

FD 

02 

20 

A8 

08B0- FC 

EE 

FC 

02 

AD 

FC 

02 

CD 

08B8- F7 

02 

DO 

CA 

60 

AD 

EF 

02 

08C0- 85 

FB 

20 

7C 

OB 

AD 

FD 

02 

08C8- 20 

A8 

FC 

CE 

EF 

02 

AD 

EF 

08D0- 02 

CD 

EE 

02 

DO 

E7 

60 

A9 

08D8- OA 

8D 

EB 

02 

A9 

21 

8D 

EA 

08E0- 02 

A9 

06 

8D 

EC 

02 

A9 

40 

08E8- 8D 

E9 

02 

20 

50 

09 

38 

AD 

08F0- EA 

02 

E9 

21 

8D 

EF 

02 

AO 

08F8- 1B 

18 

6D 

EF 

02 

88 

DO 

F9 

0900- 18 

69 

OA 

8D 

ED 

02 

18 

AD 

0908- EC 

02 

OA 

OA 

18 

6D 

ED 

02 

0910- AA 

38 

AD 

EB 

02 

E9 

OA 

OA 

0918- OA 

18 

69 

OA 

AO 

00 

20 

11 

0920- F4 

A9 

00 

AO 

OC 

A2 

39 

20 

0928- 01 

F6 

AD 

EC 

02 

FO 

09 

CE 

0930- EC 

02 

4 E 

E9 

02 

4C 

EB 

08 

0938- EE 

EA 

02 

AD 

EA 

02 

C9 

27 

0940- DO 

9F 

AD 

EB 

02 

C9 

33 

FO 

0948- 06 

EE 

EB 

02 

4C 

DC 

08 

60 

0950- AD 

EB 

02 

85 

06 

20 

DE 

OB 

0958- AC 

EA 

02 

B1 

26 

8D 

EE 

02 

0960- AD 

E9 

02 

A2 

80 

2D 

EE 

02 

0968- FO 

02 

A2 

FF 

86 

E4 

60 

20 

0970- 59 

OA 

AD 

F3 

02 

8D 

F 4 

02 

0978- A9 

1C 

8D 

F3 

02 

AD 

FI 

02 

0980- DO 

22 

AD 

FO 

02 

C9 

OB 

90 

0988- 1B 

AD 

FO 

02 

C9 

B1 

BC 

14 

0990- AD 

F2 

02 

C9 

OB 

90 

OD 

AD 

0998- F2 

02 

C9 

B1 

BO 

06 

AD 

F5 

09A0- 02 

8D 

F3 

02 

AD 

F8 

02 

FO 

09A8- C6 

AD 

F3 

02 

CD 

F5 

02 

FO 

09B0- OD 

AD 

FI 

02 

DO 

07 

AD 

FO 

09B8- 02 

C9 

C8 

90 

B2 

60 

AD 

F2 

09C0- 02 

AE 

FO 

02 

AC 

FI 

02 

20 

09C8- 11 

F 4 

AE 

F5 

02 

AO 

OC 

A9 

09D0- 00 

20 

5D 

F6 

38 

AD 

FO 

02 

09D8- E9 

OA 

4A 

4A 

8D 

F6 

02 

OA 

09E0- OA 

18 

69 

OA 

AA 

38 

AD 

F2 

09E8- 02 

E9 

OA 

4A 

4A 

8D 

F7 

02 

09F0- OA 

OA 

18 

69 

OA 

AO 

00 

20 

09F8- 11 

F 4 

AD 

E8 

02 

DO 

1D 

AD 

0A00- F3 

02 

C9 

33 

FO 

16 

A2 

39 

0A08- AO 

OC 

A9 

00 

20 

5D 

F6 

AO 


editing. Adesso fate clic sull’icona 
del proiettore e osservate il film. Se 
volete avere un'idea della vera rapidi¬ 
tà del linguaggio macchina imposta¬ 
te la velocità del film su 255 e guar¬ 
date il film. Un vero cortome¬ 
traggio! 

Dopo aver creato e visionato il vo¬ 
stro primo film può darsi che lo vo¬ 
gliate salvare. Fate clic sull’icona 
del dischetto (o premete <CTRL> 
F) per avere il menù del file, poi se¬ 
lezionate l'opzione salva con il no¬ 


0A10- 80 

A5 

EA 

FO 

02 

AO 

FF 

84 

0A18- E4 

4C 

25 

OA 

A2 

39 

AO 

OC 

0A20- A9 

00 

20 

01 

F6 

18 

AD 

F 6 

0A28- 02 

69 

E7 

8D 

F 6 

02 

AO 

00 

0A30- 90 

02 

AO 

01 

AE 

F6 

02 

18 

0A38- AD 

F7 

02 

69 

OA 

20 

57 

F 4 

0A40- AD 

F2 

02 

AE 

FO 

02 

AC 

FI 

0A48- 02 

20 

11 

F 4 

A9 

00 

AE 

F5 

0A50- 02 

AO 

OC 

20 

5D 

F6 

4C 

6F 

0A58- 09 

AO 

14 

20 

DD 

OC 

AD 

7C 

0A60- 07 

30 

OB 

29 

20 

DO 

07 

AD 

0A68- 7C 

07 

29 

40 

FO 

EB 

AD 

F2 

0A70- 02 

AE 

FO 

02 

AC 

FI 

02 

20 

0A78- 11 

F 4 

A9 

00 

AO 

OC 

AE 

F 4 

0A80- 02 

20 

5D 

F6 

AE 

7C 

04 

AC 

0A88- 7C 

05 

AD 

FC 

04 

8E 

FO 

02 

0A90- 8C 

FI 

02 

8D 

F 2 

02 

20 

11 

0A98- F4 

AO 

OC 

AE 

F3 

02 

A9 

00 

0AA0- 20 

5D 

F 6 

AD 

F8 

02 

8D 

E8 

0AA8- 02 

A9 

00 

8D 

F8 

02 

AD 

7C 

0AB0- 07 

10 

03 

EE 

F8 

02 

60 

A2 

0AB8- 00 

20 

1E 

FB 

8C 

FC 

02 

A9 

0AC0- 15 

20 

A8 

FC 

AD 

F2 

02 

AC 

0AC8- FI 

02 

AE 

FO 

02 

20 

11 

F 4 

0AD0- A9 

00 

AO 

OC 

AE 

F 4 

02 

20 

0AD8- 5D 

F6 

AD 

FB 

02 

AC 

FA 

02 

0AE0- AE 

F9 

02 

8D 

F2 

02 

8C 

FI 

0AE8- 02 

8E 

FO 

02 

20 

11 

F 4 

AO 

0AF0- OC 

AE 

F3 

02 

20 

5D 

F6 

AD 

0AF8- F8 

02 

8D 

E8 

02 

A9 

00 

8D 

0B00- F8 

02 

AD 

61 

CO 

10 

03 

EE 

0B08- F8 

02 

AD 

FC 

02 

C9 

EB 

90 

OBI 0- 1D 

AD 

FA 

02 

FO 

OD 

AD 

F9 

OBI8- 02 

C9 

13 

BO 

2D 

EE 

F9 

02 

0B20- 4C 

4A 

OB 

EE 

F9 

02 

DO 

22 

0B28- EE 

FA 

02 

4C 

4 A 

OB 

AD 

FC 

0B30- 02 

C9 

14 

BO 

15 

AD 

F9 

02 

0B38- DO 

OD 

AD 

FA 

02 

FO 

OB 

CE 

0B40- FA 

02 

A9 

FF 

8D 

F9 

02 

CE 

0B48- F9 

02 

A2 

01 

20 

1E 

FB 

8C 

0B50- FD 

02 

A9 

30 

20 

A8 

FC 

AD 

0B58- FD 

02 

C9 

EB 

90 

OC 

AD 

FB 

0B60- 02 

C9 

B9 

90 

01 

60 

EE 

FB 

0B68- 02 

60 

AD 

FD 

02 

C9 

14 

90 

0B70- 01 

60 

AD 

FB 

02 

DO 

01 

60 

0B78- CE 

FB 

02 

60 

A9 

00 

85 

FA 

0B80- A5 

FD 

85 

06 

20 

DE 

OB 

A4 

0B88- FE 

A2 

00 

Al 

FA 

51 

26 

91 

0B90- 26 

88 

18 

E6 

FA 

DO 

02 

E6 

0B98- FB 

CO 

FF 

FO 

04 

C4 

FF 

BO 

0BA0- EA 

C6 

06 

A5 

06 

C9 

FF 

FO 

0BA8- 04 

C5 

FC 

BO 

D7 

60 

A9 

00 

0BB0- 85 

FA 

A5 

FD 

85 

06 

20 

DE 

0BB8- OB 

A4 

FE 

A2 

00 

B1 

26 

81 

0BC0- FA 

88 

18 

E6 

FA 

DO 

02 

E6 

0BC8- FB 

CO 

FF 

FO 

04 

C4 

FF 

BO 

0BD0- EC 

C6 

06 

A5 

06 

C9 

FF 

FO 

0BD8- 04 

C5 

FC 

BO 

D9 

60 

A4 

06 

0BE0- B1 

CE 

85 

26 

A5 

E6 

C9 

40 

0BE8- DO 

05 

B1 

DE 

85 

27 

60 

Bl 

0BF0- EE 

85 

27 

60 

A9 

60 

85 

CE 

0BF8- A9 

OF 

85 

CF 

A9 

40 

85 

EE 

0C00- A5 

08 

38 

E9 

01 

85 

EF 

A9 

0C08- AO 

85 

DE 

A9 

OE 

85 

DF 

60 

0C10- 05 

00 

OC 

00 

15 

00 

23 

00 

0C18- 29 

00 

2F 

00 

2D 

1E 

1E 

30 

OC20- OD 

OE 

OE 

06 

00 

36 

15 

15 

0C28- 15 

15 

OC 

OC 

1C 

1C 

1C 

1C 

0C30- 37 

07 

00 

38 

36 

2D 

24 

07 

0C38- 00 

36 

2D 

3C 

2C 

07 

00 

14 


me. Battete un nome di file valido e 
premete <RETURN>. Se volete ve¬ 
dere il catalogo del dischetto introdu¬ 
cete un punto interrogativo in rispo¬ 
sta al prompt Nome del file: FLM. 

Se avete 48K o 64K di RAM i 
film possono avere una lunghezza 
massima di 52 fotogrammi in DOS 
3.3 o di 46 fotogrammi in ProDOS. 
Con 128K di RAM sono disponibili 
227 fotogrammi in DOS 3.3 e 221 
in ProDOS. Di norma un film occu¬ 
perà sul dischetto uno spazio uguale 


0C40- 00 A0 19 20 DD OC A9 01 
0C48- A0 12 20 DD OC A9 13 8D 
0C50- F8 04 A9 01 8D F8 05 A9 
0C58- 00 8D 78 04 8D 78 05 A0 
0C60- 17 20 DD OC A9 BA 8D F8 
0C68- 04 A9 00 8D F8 05 A9 01 
0C70- A0 17 20 DD OC 60 A9 00 
0C78- 8D EE 02 AC EE 02 EA EA 
0C80- EA B9 00 62 EA EA EA 20 
0C88- ED FD EE EE 02 DO EC EE 
0C90- 83 OC 18 AD 83 OC CD EF 
0C98- 02 90 E0 60 A9 00 8D EE 
0CA0- 02 20 OC FD 09 80 AC EE 
0CA8- 02 EA EA EA 99 00 62 EA 
0CB0- EA EA EE EE 02 DO EA EE 
0CB8- AE OC 18 AD AE OC CD EF 
0CC0- 02 90 DE 60 38 20 11 C3 
0CC8- 60 A2 40 A0 A0 AD 30 CO 
0CD0- 88 DO FD CA DO F5 60 A0 
0CD8- 00 20 2C FE 60 BE 00 C4 
0CE0- 8E E8 OC A0 40 A2 C4 20 
0CE8- 00 C4 60 68 A8 68 A6 DF 
0CF0- 9A 48 98 48 60 00 00 00 
0CF8- 00 00 00 00 00 00 00 00 
0D00- 00 00 10 08 28 14 24 24 
0D08- 1E 78 01 00 02 40 OC 30 
ODIO- 18 18 30 OC 60 06 40 02 
0D18- 4E 00 7F 7F 3F 7C 20 04 
0D20- 23 04 24 44 23 04 20 34 
0D28- 3F 7C 04 08 4E 20 11 00 
0D30- 11 00 4E 20 4E 11 00 36 
0D38- 0F 70 10 08 12 08 11 08 
0D40- 1F 78 09 10 05 20 0F 70 
0D48- 00 00 0F 70 0F 70 03 40 
0D50- 4E 25 29 24 3F 70 2A 50 
0D58- 35 30 2F 7E 37 76 2F 7A 
0D60- 37 76 3F 7A 06 56 05 2A 
0D68- 06 56 07 7E 4E 18 1C 25 
0D70- 3F 70 2A 50 35 30 2F 7E 
0D78- 36 56 2D 2A 36 56 2D 2A 
0D80- 3E 56 05 2A 06 56 07 7E 
0D88- 4E 70 0F 70 38 0E 28 0A 
0D90- 3F 7E 28 0A 38 0E 28 0A 
0D98- 38 0E 28 0A 38 0E 2F 7A 
0DA0- 38 0E 28 0A 4E OC 36 56 
0DA8- 3F 7E 20 02 21 42 21 42 
0DB0- 20 02 21 42 22 22 22 22 
0DB8- 21 42 10 02 20 02 3F 7E 
0DC0- 4E 03 40 36 00 00 07 7C 
0DC8- 04 04 04 04 1C 04 1C 04 
ODDO- 07 78 02 10 1C OE 34 OD 
0DD8- 2C OB 18 06 4E 28 OA 08 
0DE0- 00 00 25 4A 25 25 25 29 
0DE8- 25 29 25 29 75 26 25 29 
0DF0- 25 29 25 29 75 26 18 OE 
0DF8- 08 10 3E 2F 7A 04 20 30 
0E00- 01 00 02 40 04 20 08 10 
0E08- 10 08 20 04 78 1E 08 10 
0E10- 08 10 08 10 08 10 OF 70 
0E18- 4E 2A 50 02 OF 70 08 10 
0E20- 08 10 08 10 08 10 78 1E 
0E28- 20 04 10 08 08 10 04 20 
0E30- 02 40 01 00 4E 1E 30 3F 
0E38- 7F 7F 7F 7F 7F 7F 7F 7F 
0E40- 7F 7F 7F 7F 7F 7F 7F 7F 
0E48- 7F 7F 7F 7F 7F 7F 7F 7F 
0E50- 4E 7E 00 00 18 20 02 07 
0E58- 7C 30 1C 36 36 36 36 36 
0E60- 1C 3C 18 18 18 18 1C 18 
0E68- 3E 06 OC 18 30 36 1C 1C 
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al numero dei fotogrammi più due. 
Per esempio se avete creato un film 
lungo 56 fotogrammi esso utilizzerà 
58 settori (29 blocchi ProDOS) sul 
dischetto. 

E’ una buona idea inizializzare per 
i vostri dati un dischetto nuovo. I fi¬ 
le possono essere molto lunghi; con 
128K di memoria un unico file, può 
riempire più di metà dischetto e ri¬ 
chiedere vari minuti per il caricamen¬ 
to o il salvataggio. 

Qualche volta può sembrare che il 


0E70- 

36 

30 

18 

30 

36 

1C 

30 

30 

0E78- 

30 

3E 

36 

36 

30 

1E 

30 

30 

0E80- 

1E 

06 

06 

3E 

1C 

36 

36 

1E 

0E88- 

06 

36 

1C 

OC 

OC 

OC 

OC 

18 

0E90- 

30 

3E 

1C 

36 

36 

1C 

36 

36 

0E98- 

1C 

1C 

36 

30 

3C 

36 

36 

1C 

0EA0- 

40 

44 

48 

4C 

50 

54 

58 

5C 

0EA8- 

40 

44 

48 

4C 

50 

54 

58 

5C 

0EB0- 

41 

45 

49 

4D 

51 

55 

59 

5D 

0EB8- 

41 

45 

49 

4D 

51 

55 

59 

5D 

0 EC0- 

42 

46 

4 A 

4E 

52 

56 

5 A 

5E 

0EC8- 

42 

46 

4 A 

4E 

52 

56 

5A 

5E 

0ED0- 

43 

47 

4 B 

4F 

53 

57 

5B 

5F 

0ED8- 

43 

47 

4 B 

4F 

53 

57 

5B 

5F 

0EE0- 

40 

44 

48 

4C 

50 

54 

58 

5C 

0EE8- 

40 

44 

48 

4C 

50 

54 

58 

5C 

0EF0- 

41 

45 

49 

4D 

51 

55 

59 

5D 

0EF8- 

41 

45 

49 

4D 

51 

55 

59 

5D 

0F00- 

42 

46 

4 A 

4E 

52 

56 

5A 

5E 

0F08- 

42 

46 

4 A 

4E 

52 

56 

5A 

5E 

0F10- 

43 

47 

4 B 

4F 

53 

57 

5B 

5F 

0F18- 

43 

47 

4 B 

4 F 

53 

57 

5B 

5F 

0F20- 

40 

44 

48 

4C 

50 

54 

58 

5C 

0F28- 

40 

44 

48 

4C 

50 

54 

58 

5C 

0F30- 

41 

45 

49 

4D 

51 

55 

59 

5D 

0F38- 

41 

45 

49 

4D 

51 

55 

59 

5D 

0F40- 

42 

46 

4 A 

4 E 

52 

56 

5A 

5E 

CF48- 

42 

46 

4 A 

4E 

52 

56 

5A 

5E 

0F50- 

43 

47 

4 B 

4F 

53 

57 

5 B 

5F 

0F58- 

43 

47 

4 B 

4F 

53 

57 

5B 

5F 

0F60- 

00 

00 

00 

00 

00 

00 

00 

00 

0F68- 

80 

80 

80 

80 

80 

80 

80 

80 

0F70- 

00 

00 

00 

00 

00 

00 

00 

00 

0F78- 

80 

80 

80 

80 

80 

80 

80 

80 

0F80- 

00 

00 

00 

00 

00 

00 

00 

00 

0F88- 

80 

80 

80 

80 

80 

80 

80 

80 

0F90- 

00 

00 

00 

00 

00 

00 

00 

00 

GF98- 

80 

80 

80 

80 

80 

80 

80 

80 

0FA0- 

28 

28 

28 

28 

28 

28 

28 

28 

0FA8- 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

0FB0- 

28 

28 

28 

28 

28 

28 

28 

28 

0FB8- 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

0FC0- 

28 

28 

28 

28 

28 

28 

28 

28 

0FC8- 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

0FD0- 

28 

28 

28 

28 

28 

28 

28 

28 

0FD8- 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

0FE0- 

50 

50 

50 

50 

50 

50 

50 

50 

0FE8- 

DO 

DO 

DO 

DO 

DO 

DO 

DO 

DO 

0FF0- 

50 

50 

50 

50 

50 

50 

50 

50 

0FF8- 

DO 

DO 

DO 

DO 

DO 

DO 

DO 

DO 

1000- 

50 

50 

50 

50 

50 

50 

50 

50 

1008- 

DO 

DO 

DO 

DO 

DO 

DO 

DO 

DO 

1010- 

50 

50 

50 

50 

50 

50 

50 

50 

1018- 

DO 

DO 

DO 

DO 

DO 

DO 

DO 

DO 

1020- 

A9 

60 

8D 

2E 

10 

8D 

31 

10 

1028- 

AO 

00 

A9 

80 

19 

00 

60 

99 

1030- 

00 

60 

C8 

DO 

F5 

EE 

2E 

10 

1038- 

EE 

31 

10 

18 

AD 

2E 

10 

C5 

1040- 

08 

90 

E5 

60 

AO 

00 

A9 

80 

1048- 

19 

00 

61 

99 

00 

61 

C8 

DO 

1050- 

F5 

60 








Checksum listato 2 

APPLE CHECKER 3.0 
NOME FILE: MCS.BIN 
TIPO: B 

LUNGHEZZA: 0852 
CHECKSUM : 87 


Tavola 1. Tabellone comandi 


NUMERO 

ICONA 

COMANDO 

FUNZIONE 

1 

O 

> oppure , 

Visualizza il fotogramma 
precedente 

•I 

001 

| 

Mostra il numero del 
fotogramma corrente 

3 

O 

■ mm ■ 

> oppure . 

Avanza al fotogramma 
seguente 

4 

<CTRL>X 

Taglia il fotogramma 
corrente dal film 
e lo mette sul Clipboard 

5 

t 

H 

<CTRL>V 

Copia sul Clipboard il 
fotogramma corrente 

6 


<CTRL>P 

Inserisce il fotogramma 
nel film dal Clipboard 

7 

1 

i 

<CTRL>T 

\ 

Combina fotogrammi 
del Clipboard con il 
fotogramma corrente 

8 



<CTRL>0 

Sostituisce il fotogramma 
corrente con quello del 
Clipboard 

9 

9=1 

<CTRL>E 

Visualizza il menù 
di editing del film 

10 

E 

<CTRL>F 

Visualizza il menù del file 

11 


<RETURN> 

Proiezione! 

12 

V 


Mostra l'utensile attualmente 
in uso; fare clic sull'icona 
per cambiare utensile 
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Tavola 2. Il programma riga per riga 

80-110 Imposta i puntatori d'inizio del programma, imposta HIMEM ed 
esegue la routine di avviamento. 

120-170 Routine di spostamento del cursore da tastiera 
T60-410 Routine cne controllano dove è stato fatto clic sul cursore 
confrontando la locazione x,y del cursore con le locazioni delle icone 
sullo schermo. Controlla la locazione del cursore, evidenzia un'icona se 
vi è stato fatto clic ed esegue la routine per quell'icona. 

420-470 Cambia l'utensile mostrato nella cassetta degli utensili. 

480-680 Controlla se è stata selezionata l'icona di freccia in avanti o 
alPindietro e intraprende la relativa azione. 

690-700 Trasferisce i dati esistenti nella locazione di memoria ausiliaria 
specificata dalla variabile AD a o da pagina 97 ($6100), una pagina buffer 
allestita a questo fine. 

720-740 Routine di stampa dei numeri che seleziona le figure appropriate 
e disegna il numero del nuovo fotogramma. 

750 Disegna un riquadro di menù sullo schermo. 

760-790 Riceve ogni byte dal buffer di input e lo aggiunge alla stringa A$. 
Lo si usa dopo avere richiamato la breve routine di input INPT. 

800-1080 Gestisce le opzioni del menù di editing del film. 

1090-1290 Predispone i parametri per visionare il film e richiama la 
routine che lo visiona (la routine è stata scritta in linguaggio macchina 
per ragioni di velocità). 

1300-1520 Taglia via un fotogramma e lo mette sul Clipboard in locazione 
a pagina 8 della memoria. 

1530 Copia un fotogramma sul Clipboard. 

1540-1710 Incolla-inserisce un fotogramma dal Clipboard e sposta tutti i 
fotogrammi dopo quello corrente in avanti di uno. 

1720-1750 Combina un fotogramma del Clipboard con quello attualmente 
visualizzato. 

1770-1800 Sostituisce il fotogramma corrente con quello del Clipboard. 

1810-2340 Gestisce le varie opzioni del menù del file. 

2350-2530 Aggiorna la posizione del cursore richiamando le routine in 
linguaggio macchina per il mouse o‘ il joystick, o controllando i tasti; 
controlla inoltre i comandi da tasto disponibili. 

2550-3030 Subroutine di avviamento che disegna lo schermo, azzera la 
memoria, controlla la configurazione del sistema e inizializza le variabili. 
3040-3190 Le routine di intrappolamento degli errori. 

3200-3290 Routine di caricamento del ProDOS. 


programma si sia bloccalo. Ci può 
essere un periodo d'attesa mentre ta¬ 
gliate, incollate, o caricate in memo¬ 
ria un nuovo file. Non fatevi prende¬ 
re dal panico, ma se il programma ri¬ 
mane in sospeso per più di 30-40 se¬ 
condi farete bene a controllare se ave¬ 
te commesso un errore di battitura. 

Il proiettore e 
le scorciatoie 

Per vedere i vostri film senza l’in¬ 
gombro di finestre e icone usate il 
programma proiettore (listato 3). 
Per azionare il proiettore scrivete: 


RUN MCS.PROJECTOR 


Alla comparsa del prompt FILM- 
FLM. battete il nome del film che 
volete vedere (per avere il catalogo 
del dischetto inserite un punto inter¬ 
rogativo). Quando il film è caricato 
sarete invitati a inserire la velocità e 


la direzione. Una volta immessi que¬ 
sti valori il film viene proiettato. 
Si ripeterà in continuazione fino a 
quando premerete un tasto qualun¬ 
que, eccettuato <ESC>. A questo 
punto potete cambiare velocità e dire¬ 
zione. Per caricare un altro film pre¬ 
mete invece <ESC>. Per uscire ba¬ 
sta premere <RETURN> in risposta 
alla richiesta del nome di file. 

Movie Construction Set ha alcune 
scorciatoie incorporate che vi aiuta¬ 
no a risparmiare tempo, specialmen¬ 
te se usate l'input da tastiera. Ordina¬ 
riamente per trovare un determinato 
fotogramma si ricorrerebbe all'opzio¬ 
ne vai a fotogramma o alle icone a 
freccia. Per agire con maggiore rapi¬ 
dità usate la caratteristica di spoglio 
rapido. Tenete premuto il tasto ciuc¬ 
ia picna> e fate clic su un’icona a 
freccia. Potrete avanzare o arretrare 
rapidamente fra i fotogrammi, in 
quanto non verranno visualizzati nel¬ 
la finestra di editing finché non lasce- 


rete andare il tasto cmela picnax Se 
avete un Apple II Plus questa scor¬ 
ciatoia non è disponibile se non ave¬ 
te il joystick o le paddle. I tasti me¬ 
la del Ile c del Ile, i pulsanti delle 
paddle e il pulsante del joystick so¬ 
no i soli input che possono essere 
esplorati per vedere se sono tenuti 
premuti. Una salvaguardia incorpora¬ 
ta vi impedisce di oltrepassare l’ulti¬ 
mo fotogramma del vostro film, e 
quindi non avete da preoccuparvi di 
creare accidentalmente una quantità 
di fotogrammi vuoti. 

Come funziona 
Movie Construction Set 

Il programma combina linguaggio 
assemblatore e Applesoft. E' un pro¬ 
gramma piuttosto esteso, che riem¬ 
pie la maggior parte della memoria 
sotto la pagina 2 dclfalta risoluzio¬ 
ne. La memoria sopra la pagina 2, 
compresa la memoria in più del Ile 
o Ile di 128K, resta libera per i film 
deHutcntc. La tavola 2 spiega le 
principali subroutine del listato 1. 
La tavola 3 elenca le variabili del 
programma. 

Alcune variabili in Applesoft con¬ 
servano gli indirizzi delle routine in 
linguaggio macchina. Esse compren¬ 
dono: 


1. BEEP - E' un bip breve e dolce, 
più gradevole di CHR$(7) 

2. CLRMEM - Un breve program¬ 
ma per pulire la memoria del film 

3. DRW - La routine di disegno 
DRAW 

4. INPT - Una piccola routine che 
riceve una linea di input 

5. MOVE - La routine di allestimen¬ 
to MOVE del Monitor 

6. SCAN - La routine SCAN di 
esplorazione 

7. XFR - Una routine per trasferire 
il piccolo fotogramma nella grande 
finestra di editing 

8. RE - Una routine in linguaggio 
macchina per leggere il dischetto 

9. PLAYER - La routine che visio¬ 
na i film 

10. AUXMU - La routine che trasfe¬ 
risce i fotogrammi alla e dalla me¬ 
moria ausiliaria 

11. CLRMEM - La routine che puli¬ 
sce la memoria inferiore 

12. WR - Una routine per scrivere i 
dati sul dischetto 


Il programma fa uso di alcune rou¬ 
tine in linguaggio macchina. Per 
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scrivere i dati sul disco viene aperto 
un file dal Basic, quindi si fa ricorso 
alla routine COUT per emettere i ca¬ 
ratteri. 

Usando un'altra subroutine del Mo¬ 
nitor, RDKEY, si riesce a leggere i 
caratteri in memoria altrettanto rapi¬ 
damente. Una routine legge ogni 
byte esadccimale dal blocco di me¬ 
moria specificato e lo scrive sul di¬ 
schetto come carattere ASCII. Per ca¬ 


ricare e salvare i film ci vuole un 
tempo che è soltanto più o meno 
doppio di quello occorrente per cari¬ 
care un file binario della stessa lun¬ 
ghezza. 

Tuttavia CHR$(0), il carattere nul¬ 
lo, fa cose strane nei file ASCII. I 
caratteri nulli non possono essere let¬ 
ti o scritti a dovere in un file di te¬ 
sto. E non è possibile assicurare che 
ogni byte in memoria sia maggiore 
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Apple Ile 


MCS.PROJECTOR 
DI MIKE LINKOVICH 
COPYRIGHT (C) 1986 
BY APPLICANDO & 
MICROSPARC, INC 


Apple Ile 


REM 
REM 
REM 
REM 
REM 
REM 
REM 

IF PEEK (104) < > 16 THEN POKE 103,129: POKE 104,16: POKE 4 

224,0: PRINT CHR$ (4)"RUN MCS.PROJECTOR" 

PRINT CHRS (4)"BLOAD MCS.BIN" 

LOWMEM = 97: IF PEEK (48896) < > 76 THEN HIMEM: 16384 

MAXMEM = 149: IF PEEK (48896) - 76 THEN MAXMEM = 143 
POKE 8,MAXMEM + 1 

DRW = 2 94 0 :SCAN = 2990:MD = 2957:DV = 1:D$ = CHRS (4):AUXMV 

= 3268 : MOVE = 3287 

PLAYER = 2151 :PZ = 2236:RE = 3228 

B = MAXMEM: ONERR GOTO 640 

TEXT : HOME : HTAB 5: PRINT n MCS PROJECTOR DI MIKE LINKOVICH" 

: PRINT " (C) 1986 BY APPLICANDO & MICROSPARC": POKE 34,3 
VTAB 24: INPUT "FILM - FLM.";F$: IF F$ < > "?" GOTO 180 

HOME : IF PEEK (48896) = 76 THEN PRINT D$"CAT": GOTO 170 
PRINT D$"CATALOG": GOTO 170 
ON ( LEN (F$) = 0) GOTO 250: GOSUB 460 

HOME : VTAB 5: INPUT "VELOCITA* (1-255) - ";DL: ON (DL < 1 OR 
DL > 2 55) GOTO 190-.DL = 25 6 - DL 
VTAB 6: INPUT "DIREZIONE (A=AVANTI I=INDIETRO) - ";DN$ 

IF DN$ < > "A" AND DNS < > CHRS (97) AND DNS < > "I" AND 
DNS < > CHRS (105) THEN GOTO 200 

DN = 1: IF DNS = "A" OR DNS = CHRS (97) THEN DN = 0 
HGR2 : HCOLOR= 7: HPLOT 123,67 TO 170,67 TO 170,114 TO 123,11 
4 TO 123,67: HPLOT 122,67 TO 122,114: HPLOT 171,67 TO 171,114 
: CALL 3060 

HPLOT 120,64 TO 173,64 TO 173,117 TO 120,117 TO 120,64: HPLOT 
140,64 TO 120,40: HPLOT 153,64 TO 173,40 
HPLOT 110,119 TO 183,119: HPLOT 115,119 TO 115,140: HPLOT 177 
,119 TO 177,140 

GOSUB 300: TEXT : ON G GOTO 190,160 

TEXT : HOME : END 

REM TRASFERIMENTI MEMORIA 

POKE 60,0: POKE 61,LOWMEM: POKE 62,255: POKE 63,LOWMEM: POKE 
66,0: POKE 67,AD - (MAXMEM - 7): POKE AUXMV,56: CALL AUXMV: R 
ETURN : REM PRINCIPALE->AUSILIARIA 

POKE 60,0: POKE 61,AD - (MAXMEM - 7): POKE 62,255: POKE 63,AD 

- (MAXMEM - 7): POKE 66,0: POKE 67,LOWMEM: POKE AUXMV,24: CA 
LL AUXMV: RETURN : REM AUSILIARIA->PRINCIPALE 

REM ROUTINE DI PROIEZIONE 

POKE 252,70: POKE 253,111: POKE 254,23: POKE 255,18 
POKE MD, 234 : POKE MD + 1, 234 : POKE DRW + 1,0 
IF DN THEN 380 

POKE 751,LOWMEM- + 1: POKE 764,8 : POKE 765,DL: POKE 759, 0: IF 
AM > B THEN POKE 759,AM - (MAXMEM - 8): POKE 750,B + 1 
POKE PZ, 96: POKE PZ - 11,238: IF AM < B + 1 THEN POKE 750,AM 
+ 1 

CALL PLAYER 

IF PEEK ( - 16384) > 127 THEN GOTO 440 
GOTO 330 

POKE 765,DL: POKE 759,0: POKE 750,LOWMEM: IF AM < B + 1 THEN 
POKE 751,AM 

IF AM > B THEN POKE 751,B: POKE 759,7: 

- 7) 

POKE PZ - 11,206: POKE PZ,234: IF AM < B + 1 THEN CALL PZ + 

1 

IF AM > B THEN CALL PZ - 54 
IF PEEK ( - 16384) > 127 THEN 440 
GOTO 380 

G = ( PEEK ( - 16384) = 155) + 1: POKE - 16368,0: RETURN 
REM CARICA 

PRINT : PRINT D$"VERIFY FLM."F$",D"DV: PRINT D$"OPEN FLM."F$: 
PRINT D$"READ FLM."F$ 


POKE 764,AM - (MAXMEM 


(Continua) 
















Tavola 3. Le principali variabili 

Variabile 

Funzione 

A$ 

Usata per input d'impiego universale nei menù 

AC 

Contatore d'indirizzo usato per recuperare gli input 

AD 

Il numero della pagina di memoria del fotogramma 
corrente 

AM 

Il più alto numero di pagina di memoria utilizzato; in un 
film vuoto AM e AD partono entrambe da 98, e di mano 
in mano che si avanza con i fotogrammi AM aumenta 

C 

Variabile di conteggio d'impiego universale per i loop 

CT 

Il tipo del dispositivo di input (1 = joystick; 2 = mouse; 

3 = tastiera) 

D$ 

CHR$(4) 

ESC$ 

CHR$(27) 

F$ 

Stringa del nome di file per l'accesso al dischetto 

G 

Variabile d'impiego universale per 
l'immagazzinamento di qualsiasi cosa, da quello dei 
puntatori GOTO a quello temporaneo di una variabile 

MX 

Valore massimo di AD 

TL 

Variabile degli utensili (2 = matita; 3 = gomma) 

S 

Numero della figura del cursore (1 = freccia; 2 = 
matita; 3 = gomma) 

OS 

Vecchio numero di figura del cursore 

X.Y 

Coordinate correnti del cursore 

OX.OY 

Vecchie coordinate del cursore 

u$ 

Carattere di sottolineatura 

LN$ 

Carattere di su e giù (nel II e nel II Plus è un punto 
esclamativo; nel Ile e nel Ile è un carattere di barra 
verticale) 

HR.HL 

Valori destro e sinistro della figura a blocco da 
disegnare 


di zero (questo avrebbe voluto dire 
che ogni fotogramma disegnalo 
avrebbe dovuto avere almeno un pun¬ 
tino on ogni sette puntini tracciati). 

La soluzione era mettere a uno 
tutti i bit alti, che di solito non rap¬ 
presentano dati grafici, nella memo¬ 
ria grafica. Così il valore jdi ogni 
byte salvato sarebbe stato 128 ($80) 
o maggiore, senza conseguenze sul¬ 
l'aspetto dello schermo monocroma¬ 
tico. 

In ProDOS si può fare buon # uso 
del potente comando BLOAD per ac¬ 
celerare parecchio il caricamento dei 
file. Per ricevere i fotogrammi nella 
memoria ausiliaria, vengono caricati 
a S1600-S61FF, uno alla volta, e tra¬ 
sferiti poi alle loro destinazioni fina¬ 
li facendo un CALL alla routine in¬ 
corporata AUXMOVE. Il drive fa un 
suono un po' strano durante questa 
operazione, ma la cosa funziona a 
meraviglia (non preoccupatevi, non 
farà male al drive). 

Per usare la memoria ausiliaria si 
è fatto affidamento sulla subroutine 
AUXMOVE, che viene impiegata 
per trasferire memoria dai 64K della 
RAM principale ai 64K dell'ausilia- 
ria e viceversa. Purtroppo per quanto 


i parametri del blocco di memoria da 
trasferire possano essere fissati trami¬ 
te l'Applesoft Basic entrambe le rou¬ 
tine MOVE c AUXMOVE del Mo¬ 
nitor devono essere richiamate in lin¬ 
guaggio macchina. Il bit carry dev'es¬ 
sere messo a uno e a zero quando si 
usa AUXMOVE, e nel registro Y 
dev’essere caricato uno zero quando 
si usa il comando MOVE del Mo¬ 
nitor. 

La più estesa routine in linguag¬ 
gio macchina del programma dise¬ 
gna il cursore, legge l’input da jo¬ 
ystick o mouse e traccia i punti in 
conformità con la posizione del cur¬ 
sore. Quando si traccia un punto vie¬ 
ne disegnato un quadratino di 3 pixel 
per 3 in una posizione corrisponden¬ 
te alla locazione del cursore. Dato 
che il blocco è più grande di un pun¬ 
to (nove volte più grande, più un 
punto per una linea di separazione 
fra blocco e blocco) ci sono per un 
blocco sedici posizioni possibili del 
cursore. 

L'algoritmo è abbastanza sempli¬ 
ce. Per trovare la posizione del bloc¬ 
co si sottrae 10 dalle coordinate x c- 
y (la finestra di editing c discosta 10 
puntini dalla posizione 0,0 dello 
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GOSUB 550: GOTO 540 
G < B + 2 THEN POKE 751, 
B + 1 


INPUT G 

IF PEEK (48896) = 76 THEN 
POKE RE + 18,LOWMEM + 1: IF 
IF G > B + 1 THEN POKE 751 
CALL RE 

ON (G < B + 2 OR MX = B) GOTO 530: POKE 751, LOWMEM 
= B + 1 TO G - 1: POKE RE + 18, LOWMEM: CALL RE:AD 
270: NEXT 

PRINT : PRINT D$ "CLOSE FLM. " F$ 

AM = G - 1: RETURN 
PRINT D$"CLOSE": IF G > B 
, A 


1: FOR C 
C: GOSUB 


+ 1 THEN 
’ (LOWMEM + 


GOTO 590 

1) * 256", B4 , E"G * 256", 1 


PRINT D$"BLOAD FLM."F$" 

TXT": CALL 4128 
RETURN 

POKE 251,14: POKE DRW + 1,56: POKE 252,100: POKE 253,111: POK 
E 254,HR: POKE 255,HL: CALL DRW: XDRAW S AT X,Y: RETURN 
PRINT D$"BLCAD FLM."F$",A"(LOWMEM + 1) * 256",B4,E"(B + 1) * 
256", TTXT": CALL 4128 

POKE 751,LOWMEM + 1: FOR C=B+lTOG-l 

PRINT D$"BLOAD FLM."F$", A"LOWMEM * 256",B"(C - (LOWMEM + 1)) 
25 6 + 4 " , L25 6, TTXT" : CALL 4164 
AD = C: GOSUB 270: NEXT 
AD = LOWMEM + 1: GOTO 570 

TEXT : HOME : NORMAL : VTAB 10: PRINT "ERRORE N." PEEK (222): 
CALL - 3228 

PRINT : PRINT "PREMI <RETURN> PER CONTINUARE";: INPUT A$: GOT 
O 100 


schermo Hi-Res), si divide per 4 ese¬ 
guendo due istruzioni LSR (il che 
elimina automaticamente il resto), 
si moltiplica per 4 eseguendo due i- 
struzioni ASL e infine si aggiunge 
10 per avere la posizione finale. 

La routine XFR trova lo stato di 
on o off di un byte nella finestra del 
fotogramma spostando nel carry il 
bit voluto. Se il bit c on il carry e. a 
uno. Se il bit c off il carry è a zero. 

La routine XFR usa un algoritmo 
simile a quello ora descritto per met¬ 
tere un blocco nella finestra di edi¬ 
ting. Lo schermo impiega ben cin¬ 
que secondi per il ritracciamento. 

Il programma occupa quasi tutta la 
memoria disponibile. 


1 

Checksum del listato 3 

1 

r \ 

Questo programma è disponibile 

APPLE CHECKER 3.0 


su dischetto. L’elenco, i prezzi 

NOME FILE: MCS.PROJECTOR 


e le modalità d’ordine di questo 

TIPO: A 


e degli altri dischetti disponibili 

LUNGHEZZA: 08DB 


sono riportati nella rubrica 

CHECKSUM : 23 


Disk Service. 


© By Nibble e Applicando 



Quando prezzo e qualità si danno la 

® ™ ... 


PL0TTER 7 PENNE %W5T' 

Formato UNI A3/A4 
su carta o lucido \ 

7 penne, fibra, sfera 

e ceramica 

Risoluzione 0,05 mm 

Completo di interfacce 

RS-232-C e Centronics 

Linguaggi HPGL e Gould 

Compatibilità Hardware 

con PC IBM, Olivetti, Apple, ^ 

HP, Rainbow 100 ecc. 

Compatibilità Software con AutoCad, 

Lotus 1-2-3 e Simphony, FrameWork, Energraphics ecc 


Consegna pronta 


Settembre '86 - Pag. alla consegna, IVA esclusa, 1 Lgs = Lire 2250 a 2 ( 



Periferiche e Strumenti elettronici 


MILANO: Via Fezzan, 9 - Tel. (02) 42.25.945/6 
ROMA: ViaC. Magni, 71 - Tel. (06)51.46.194 
TORINO: Miramas.r.l.-Tel. (011)59.58.27 
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Si ripromettono in un volger di tempo brevissimo di divenire le regine del 
settore. Compatte, efficienti, su misura per tutte le esigenze, ecco le 
rampanti Apple compatibili targate Ivrea. 


Printed in Italy 


Beati i giovanissimi perchè il re¬ 
gno delle tastiere è loro: hanno co¬ 
minciato subito su quelle dei compu¬ 
ter. Gli ultraquarantenni invece ricor¬ 
dano perfino le vecchie Underwood, 
e i trentenni rischiano di aver tocca¬ 
to anche qualche Praxis. Ma scagli 
la prima pietra chi non ha mai pigia¬ 
to, almeno una volta nella vita, i ta¬ 
sti di una Lettera 22. 

Il fatto è che in Italia, ancor oggi, 
'scrittura" è sinonimo di Olivetti (il 
75% del mercato tradizionale, mecca¬ 
nico e elettrico), e allora non c'è da 
stupirsi se la casa d'Ivrea, presentissi¬ 
ma come tutti sanno anche nel setto¬ 
re personal computer, vuol rodere 
una fetta anche in casa Apple, alme¬ 
no per quel che, nel mondo dei com¬ 
puter, è più vicino alla scrittura tradi¬ 
zionale: le stampanti. Del resto le 
mire di Olivetti sono dichiarate: 
l'ambizione non è quella di disturba¬ 
re questa o quella casa produttrice di 
computer, ma bensì quella di sop¬ 
piantarle tutte, almeno in fatto di 
stampanti, imponendosi nel giro di 
due anni come leader del mercato ita¬ 
liano, e possibilmente vendendone 
80 mila nel solo 1987. 

D’altra parte è noto a tutti che le 
stampanti rappresentano spesso l'a¬ 
nello debole di un sistema persona¬ 
le. La loro meccanica è pressoché l'u¬ 
nica parte in movimento dell'intero 
marchingegno, e dunque è la più sog¬ 
getta a problemi. Senza contare che 
i marchi disponibili sul mercato, per 
chi decide di non seguire i suggeri¬ 
menti impliciti del produttore della 
Cpu, sono un'infinità e quasi tutti 
hanno nei loro listini numerosi mo¬ 
delli, che differiscono tra loro per 
prezzi e prestazioni anche in modo 
notevole. 


Se orientarsi in questa giungla fatta 
di termini tecnici spesso incompren¬ 
sibili ai non addetti ai lavori non è 
facile, la situazione si complica se 
si consultano diversi rivenditori in 
cerca di un consiglio. Immancabil¬ 
mente il giro di consultazioni termi¬ 
na con una serie di pareri contrastan¬ 
ti, che lasciano l’aspirante comprato¬ 
re al punto di partenza. Il problema 
vero e numero uno è infatti quello 
della reale compatibilità della stam¬ 
pante scelta con il Ile, il Ile o il Ma¬ 
cintosh di casa; mentre il problema 
vero e numero due è quello di assicu¬ 
rarsi che il primo guasto non riveli 
una clamorosa latitanza della rete di 
assistenza. 


Capillare in Italia almeno quanto la 
Fiat, è proprio su questa carta che 
Olivetti ha dunque deciso di giocare 
lanciando la sua nuova linea di stam¬ 
panti Apple compatibili. Le stam¬ 
panti per personal computer non so¬ 
no certo una novità per Ivrea: la Oli¬ 
vetti Peripherals, una consociata del¬ 
la casa madre, produce da anni stam¬ 
panti destinate a essere marchiate da 
altri costruttori del calibro di He¬ 
wlett Packard e Digital. Ma l’avere 
affiancato ai modelli per i computer 
Ms-Dos quelli per i personal della 
mela iridata è in realtà un riconosci¬ 
mento implicito del successo conse¬ 
guito dalla Apple in Italia e ancor 
più all’estero. 
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Tredici per tutti i gusti 

"Le stampami Olivetti-Apple com¬ 
patibili sono nate da una precisa con¬ 
statazione", dice Stefano Zompctta 
che, dopo anni di attività in Apple è 
da qualche mese responsabile marke¬ 
ting della divisione stampanti Olivet¬ 
ti: "mancava sul mercato italiano 
una gamma di prodotti capace di sod¬ 
disfare le richieste di tutti gli utenti, 
da quelli che hanno esigenze limitate 
a quelli che operano in ambiti profes¬ 
sionali". Come dire, per dir pane al 
pane, che fra la Imagewriter II e la 
LaserWriter Plus c’era dello spazio 
da colmare. E’ così stata messa in 
cantiere una linea di stampanti com¬ 
posta da ben 13 modelli (e presto si 
aggiungerà una laser) per tutti i gu¬ 
sti: a matrice, a margherita, ter¬ 
miche. 

Applicando ha provato per i suoi 
lettori i ire modelli che per il rappor- 
toqualità-prezzo-prestazioni si rivela¬ 
no più interessanti. Eccoli. 

Dm 100. E' una stampante leggera 
(quattro chilogrammi) e compatta (le 
dimensioni sono 74 x 346 x 235 
millimetri) destinata a chi vuole ri¬ 
sultati di buon livello senza per que¬ 
sto dovere stanziare cifre eccessive. 
Nella versione base la Dm 100 è for¬ 


nita di una guida per l’inserimento 
dei fogli singoli, mentre l'avanza¬ 
mento della carta, sia dei fogli singo¬ 
li sia del modulo continuo, e control¬ 
lato automaticamente in modo da 
consentire che la parte scritta termi¬ 
ni sempre allo stesso punto, esatta¬ 
mente dove ha deciso l'utente. 

Appositamente per questo modello, 
poi, sono stati studiati dei nastri in 
tessuto che hanno un'autonomia di 
circa 800 mila battute, forniti in car¬ 
tucce facili da sostituire. In condizio¬ 
ni normali la velocità ò di 120 carat¬ 
teri al secondo, mentre in ncar lcttcr 
quality è di 25 caratteri al secondo. 
La testina è a nove aghi e i caratteri 
normali sono modellati da nove pun¬ 
ti in orizzontale e altrettanti in verti¬ 
cale (in near lcttcr quality i punti ver¬ 
ticali diventano 18). Il prezzo è stato 
fissato in 650 mila lire. 

Dm 290. E’ una stampante a matri¬ 
ce che ha nella velocità e nella preci¬ 
sione le sue caratteristiche salienti. 
La Dm 290, infatti, stampa a 160 ca¬ 
ratteri al secondo/(35 in lcttcr qua¬ 
lity). Le parti meccaniche in movi¬ 
mento sono state ridotte al minimo 
dai progettisti della Olivetti, per ga¬ 
rantire una maggiore affidabilità: in 
più tutte le funzioni sono controlla¬ 
te da un microprocessore che esegue 
automaticamente un’autodiagnosi 
ogni volta che si presenta una situa¬ 
zione non corretta dal punto di vista 
funzionale. Anche questo modello è 
dotato, pure nella versione standard, 
di trascinamento per fogli singoli; 
opzionale, invece, un trascinatore 
per fogli più piccoli. 

Gli stili di scrittura disponibili so¬ 
no 24 (normale, ribattuto, grasset¬ 
to, allargato e via dicendo), anche in 
lcttcr quality, e possono essere varia¬ 
ti aH'intcrno della stessa riga per 



mettere in risalto parole o frasi. La 
testina utilizza una matrice di 9 x 9 
aghi (18 x 18 nella stampa ad alta 
qualità) c sono previste prestazioni 
grafiche. Il peso è di 8,5 chilogram¬ 
mi.c le dimensioni di 100 x 527 x 
295 millimetri. Il prezzo di listino c 
di 1,3 milioni di lire. 

Dy 450. E' una stampante a mar¬ 
gherita ad altissima qualità, progetta¬ 
ta per chi non intende scendere a 
compromessi con la qualità di stam¬ 
pa. La velocità ò di 55 caratteri al se¬ 
condo e tutti i comandi, sia quelli su 
console sia quelli di programmazio¬ 
ne, sono facilmente accessibili e di 
immediata comprensione. Ma la ca¬ 
ratteristica più interessante della Dy 
450 è la possibilità di eseguirne la 
manutenzione in tempi brevissimi: 
grazie al programma di autodiagno¬ 
stica nessun intervento supera i 30 
minuti. 

Una serie di accessori permette di 
lavorare su carta intestata, su carta 
intestata seguita da secondo foglio di¬ 
verso, su buste, prestampati o modu¬ 
li continui; caricatori automatici di 
fogli singoli, a uno, due o tre casset¬ 
ti, provvedono in qualche secondo a 
posizionare i fogli o le buste in mo¬ 
do impeccabile. Ciò significa, in 
concreto, che il top della gamma Oli¬ 
vetti ò in grado di gestire senza pro¬ 
blemi anche la più massacrante delle 
mailing list. Il peso, di 13,5 chilo¬ 
grammi, consente di spostare l'appa¬ 
recchio senza troppe difficoltà. Infi¬ 
ne il prezzo: circa 2,6 milioni di 
lire. 

Fin qui le caratteristiche tecniche. 
"Ma le nostre nuove stampanti non 
vogliono imporsi soltanto a colpi di 
caratteri al secondo o di qualità di 
stampa”, dice Zompetta. "Decisiva 
sarà anche l’efficienza della rete di 
assistenza, composta dai 1200 con¬ 
cessionari Olivetti distribuiti in tut¬ 
ta Italia. In più abbiamo raggiunto 
un accordo con la Elcom di Gorizia, 
tradizionalmente legata al mondo Ap¬ 
ple, per la distribuzione di prodotti 
Olivetti alla rete degli Apple Cen¬ 
ter". E anche per chi dovesse scopri¬ 
re di avere puntato su una stampante 
sottodimensionata rispetto alle reali 
esigenze di lavoro i problemi saran¬ 
no ridotti ai minimi termini: "Le 
stampanti Olivetti manterranno un 
discreto valore anche sul mercato del¬ 
l’usato", dice Zompetta, "rendendo la 
nostra gamma ideale anche sotto il 
profilo del value for money. 

Guido Ricciardi 
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È wmmmmmmmmmmmmmmtmmmmam 

All'approssimarsi della più importante manifestazione dell'anno nel campo 
dell'Informatica, lo Smau, che si terrà a Milano nei padiglioni della Fiera dal 
17 al 22 settembre, si fanno sempre più insistenti le voci di una Apple... 


In odore di novità 


Dopo aver chiuso il terzo trime¬ 
stre del corrente anno fiscale (aprile- 
giugno) con un risultato record (utili 
per 32 milioni di dollari), che confer¬ 
ma lo stato di buona salute e l'effica¬ 
cia della ristrutturazione avviata un 
anno fa, la Apple si appresta a lan¬ 
ciare sul mercato mondiale qualche 
importante novità. 

Almeno è questa la sensazione di 
molti giornali specializzati america¬ 
ni, che da tempo vanno preannun¬ 
ciando un nuovo modello della serie 
Apple //, completamente rinnovato, 
a 16 bit e dalle capacità grafiche, 


1-11 Centro Stampa, I Sistemi 
Informativi, le Comunicazioni 


R,-L input per Rpple Edit 
Bj-L'input per Apple Edit 
^-Analisi e progetto di sistemi 
D,-Sistema di posta elettronica 
Ej-Progetto di Sistemi Informativi 
Fj-Seruizio P.G.E. 

G,-lntegrazione di sistemi UniH 
Hj-Emulazione IBM 3270 
I ^Integrazione di sistemi MS-DOS 
L^Emulazione terminali sincroni 
M t -L output di Rpple Edit 
N^L'output di Apple Edit 


stando alla rivista A+, almeno pari, 
se non addirittura superiori, ad Ami¬ 
ga. Alla Apple Italia non conferma¬ 
no, ma l’amministratore delegato 
Sergio Nanni, nel commentare il bi¬ 
lancio del terzo trimestre, ha detto: 
"Questi dati sono estremamente si¬ 
gnificativi sia perché confermano 
un'alta e ormai consolidata redditivi¬ 
tà, che contrasta con i recenti annun¬ 
ci di risultati di altre società del set¬ 
tore, sia perché segnano la ripresa 
della crescita del fatturato determina¬ 
ta soprattutto dal successo di vendita 
delle diverse versioni di Macintosh 
negli ambienti aziendali". 


2 -Sii Strumenti di produttività 
applicati_ 


R 2 -MacWrite + MacDr aw+MacPro ject 
B 2 -Grafica creativa (Rpple //) 

C 2 -Data Base (Macintosh) 

D 2 - LUord processor (Rpple //) 
E 2 -lntegrati (Macintosh) 

F 2 -Data Base (Apple //) 

G 2 -Computer Rided Design (Macintosh) 
H 2 -lntegrati (Linea Rpple //) 
i 2 - Fogli elettronici (Rpple //) 
L 2 -lntegrati (Macintosh) 

M 2 -Grafica e colori (Rpple //) 

N 2 -0ata Base (Macintosh) 


Sviluppo SUI per Rpple 
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Se ne deduce -o almeno noi così 
l'interpretiamo- che è venuto il mo¬ 
mento di pensare anche alla linea del¬ 
l'Apple //, trascurata a causa dell'im¬ 
pegno che ha comportato il Macin¬ 
tosh. Tanto più che in questi ultimi 
mesi la Apple ha avuto a disposizio¬ 
ne i mezzi finanziari per portare a ter¬ 
mine le costose ricerche legate a un 
nuovo modello di computer. 

E sul fronte Macintosh? Anche 
qui regna il riserbo più assoluto, ma 
un'ultima considerazione ci fa sicuri 
di uno Smau '86 ricco di novità: da 
tre anni, infatti, allo Smau la Apple 
ha presentato ufficialmente le sue no¬ 
vità, nel 1983 Lisa, nell'84 Macin¬ 
tosh, nell'85 le stampanti LaserWri¬ 
ter e ImagcWriter IL Nell’86 potrà 
essere da meno? 

Chi ne ha la possibilità, quindi, 
non manchi aH’appuntamento di me¬ 
tà settembre. Applicando intanto vi 
fornisce in anteprima la piantina del¬ 
lo stand Apple, nel Padiglione 12, 
C21-23 e D22-24, dove anche noi sa¬ 
remo presenti. 


3 -La Gestione Aziendale e 
le Ubere Professioni 


fl 3 -Contabilità integrata (Macintosh) 
B 3 -Modellì fiscali (Apple //) 

C 3 -Studi legali (Macintosh) 

D 3 -Contabilità generale (Rpple //) 

E 3 “Ingegneria civile (Macintosh) 

F 3 - Contabilità per edili (Macintosh) 
G 3 -$tudi commercialisti (Apple //) 

H 3 - Progettazione edile (Rpple //) 
l 3 -Statistiche mediche (Macintosh) 
L 3 -Paghe e stipendi (Linea Apple //) 

M 3 -Studi dentistici (Macintosh) 

N 3 -Progettisti architettonici (Macintosh) 


4- La Scuola e l'HI-Tech 


R<i“CD-ROM (Macintosh) 
B^-Sistemi esperti (Macintosh) 
C 4 -Corsi didattici (Linea Apple //) 
D 4 -Formazione professionale 
(Macintosh) 
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Applicando ha un nuovo 


Abbonamento tradizionale con dono? 
Abbonamento biennale con supersconto? 

Oppure la nuovissima formula 
rivista con dischetto, per non avere più 
problemi di digitazione? 
Per tutti, comunque, tanti 
programmi, notizie, consigli e... 


L'abbonamento annuale con disco 
[programmi per Macintosh 
prevede 10 numeri di Applicando, 
ognuno corredato di un dischetto 
da 3 pollici e 


1/2 su cui sono 

registrati tutti ì programmi per 

Macintosh pubblicati sulla rivista. 

Inoltre sono compresi nel prezzo 

dell'abbonamento l'ultima 

edizione delle Pagine 

del software e 

dell'hardware 

per Apple e un 

portadischetti. 


Data base Cfs, 
prova su strada 

Mac-lbm PC Tutto 
sui collegamenti, 
tutto sull'emulazione 









presente 




.Città _ 


. Provincia. 


Data_ 


Firma 


L'abbonamento annuale con disco 
programmi per Apple II 
prevede 10 numeri di Applicando, 
ognuno corredato con un dischetto 
da 5 pollici e 1/4 su cui sono 
registrati tutti i programmi per Apple II 
pubblicati sulla rivista. 

Inoltre sono compresi nel prezzo 
dell'abbonamento l'ultima edizione 
delle Pagine del software e dell'hardware 

per Apple e un 
portadischetti. 


dtsKf 


Compilare e spedire il tagliando sottostante a 
Editronica srl, Corso Monforte 39,20122 Milano. 


Sì! Desidero sottoscrivere il seguente abbonamento: 


□ Abbonamento annuale con dono, che dà diritto a ricevere 10 numeri di 
Applicando e in omaggio l'ultima edizione delle Pagine del software e dell’hardware 
per Apple , il catalogo ragionato di tutti i programmi e dei maggiori prodotti hardware 
esistenti in commercio per Apple II e Macintosh, al prezzo di lire 60.000. 

□ Abbonamento annuale senza dono, che dà diritto a ricevere 10 numeri di 
Applicando , al prezzo di lire 50.000, con uno sconto di 10.000 lire sul prezzo di 
copertina. 

□ Abbonamento biennale con dono, che dà diritto a ricevere 20 numeri di 
Applicando e in omaggio l'ultima edizione più quella successiva delle Pagine del 
software e dell'hardware per Apple , il catalogo ragionato di tutti i programmi e dei 
maggiori prodotti hardware esistenti in commercio per Apple II e Macintosh, al prezzo 
di 1 00.000 lire. Inoltre lei risparmia ben 20.000 lire sul prezzo di copertina. 

□ Abbonamento biennale senza dono, che dà diritto a ricevere 20 numeri di 
Applicando , al prezzo di lire 80.000, con uno sconto di 40.000 lire sul prezzo di 
copertina. 

□ Abbonamento annuale con disco programmi per Apple II, che dà 

diritto a ricevere 10 numeri di Applicando, 10 dischetti da 5 pollici e 1/4 e le Pagine del 
software e dell'hardware per Apple , al prezzo di 260.000 lire. Infatti ogni numero le 
verrà recapitato direttamente a domicilio insieme con il dischetto con già 
registrati tutti i programmi per Apple II pubblicati quel mese. Inoltre, in 
dono, le verrà subito recapitato un elegante portadischetti. 

□ Abbonamento annuale con disco programmi per Macintosh, che dà 

diritto a ricevere 10 numeri di Applicando, 10 dischetti da 3 pollici e 1/2 e le Pagine del 
software e dell'hardware per Apple, al prezzo di 300.000 lire. Il dischetto cne ogni 
mese arriverà a domicilio conterrà tutti i programmi per Macintosh . Anche 

>, un eie 


in questo caso le verrà inviato subito, in dono, un elegante portadischetti. 


□ Inviatemi i seguenti arretrati a 7.000 lire ciascuno (per l'elenco degli arretrati 
vedere alla pagina seguente. I nn. 1 e 2 sono esauriti): NN_ 


□ Allego assegno non trasferibile si L_ 
Corso Monforte 39, 20122 Milano. 


intestato a Editronica srl, 


□ Allego ricevuta di versamento di L 


intestato a Editronica srl, Corso Monforte 39, 20122 Milano. 


sul C/C postale n. 19740208 


□ Pago fin d'ora L._ 


_con la mia carta di credito BankAmericard 


.scadenza- 


d'Italia ad addebitare l'importo sul mio conto BankAmericard. 

Cognome_?_Nome- 

Indirizzo _:_;_ 


autorizzando la Banca d'America e 























...ma anche un passato. 


f Per ordinare gli arretrati compila il 


v 


tagliando della pagina precedente 




3 - settembre/ottobre 1983 - Lire 
7.000 • Un programma di Data Base ac¬ 
cessibile a tutti • Ecco Logo in italiano • U- 
na scheda e una telecamera e il tuo Apple 
vede • Etichette spiritose o bizzarre • Pic¬ 
coli editori, club e associazioni possono rag¬ 
giungere soci e abbonati facilmente • Equo 
canone con VisiCalc • Una routine e la E- 
pson M 80 stampa i grafici • Seconda pun¬ 
tata del corso di Basic • Con un uso accor¬ 
to del WPL ecco pronto un documento di 
più pagine, personalizzato, con decine di o- 
pzioni diverse • Dadi e punti (gioco). 

4 - novembre/dicembre 1983 - Lire 
7.000 • Tre schede, una tastiera e un po' 
di software: il computer diventa un'intera 
orchestra • Pianoforte, organo e violino in 
Pascal • Per imparare a leggere più veloce¬ 
mente (e fare esercizio di inglese) • Elogio 
del VisiDex • Grazie Lisa: cos'è e a chi può 
servire il rivoluzionario personal Apple • 
Rompiquindici • Per chi ha dischetti del Si¬ 
stema Pascal, ecco una rassegna delle 
possibilità offerte e dei comandi a disposi¬ 
zione • Dedalus • Terza puntata del corso 
Basic ■ Guida ragionata dei software in 
commercio per la gestione condominiale • 
Una numeric keypad fatta solo di so¬ 
ftware. 

5 - gennaio/febbraio 1984 - Lire 
7.000 • La tecnologia del mouse applica¬ 
ta all'Apple II • In memoria i vostri impegni 
di un anno intero • Contabilità semplificata 

■ Battaglia di cannoni • Investor, uno dei mi¬ 
gliori programmi che fornisce in tempo rea¬ 
le il quadro esatto di come vanno i propri in¬ 
vestimenti finanziari; ideale per la gestione 
del proprio portafoglio titoli • Quarta punta¬ 
ta del corso di Basic • Il gioco delle freccet¬ 
te ■ Prima puntata di un facile corso di Pa¬ 
scal • Macintosh: piccolo, maneggevole, 
portatile. 

6 - marzo/aprile 1984 - Lire 7.000 

■ Appleworks (Tre per te): un unico softwa¬ 
re per database, word processor e sprea¬ 
dsheet • Anteprima di Apple Ile • Titoli di 
stato, cartelle fondiarie, obbligazioni: l'Ap¬ 
ple per difendere i risparmi • Un mostro tira 
l'altro: riuscirete a mangiarli tutti? • Stres- 
s: un nuovo gioco per vincere lo stress • 
Memoria riga per riga: come localizzare 

R adi di un programma velocemente con Ll- 
IEFINDER «Seconda puntata del Pascal 
• L'Applesoft per semplificare Timpacca- 
mento dei record e il recupero delle infor¬ 
mazioni • Grafici a passeggio: il dump della 
pagina grafica da Apple II a una stampan¬ 
te semigrafica. 

7 - maggio/giugno 1984 - Lire 
7.000 ■ PròDOS: il nuovo sistema opera¬ 
tivo con la possibilità di usane il ProFile e il 
Mouse • Computer e pennello: Apple e i 
suoi capolavori* Topolino aiuta i bambini a 
riconoscere i numeri ■ impedite ai curiosi di 
ficcare il naso nei vostri programmi • Una 
cassetta di salvataggio per registrare i 
programmi più importanti • Grafica e ani¬ 
mazione: sesta puntata dell'Applesoft • 
Diventa un disk jockey infallibile: f Apple tie¬ 
ne in ordine l'archivio dei tuoi dischi ■ Aiuto: 
un programma che vi consente di trovare 
subito gli errori di battitura e di correggerli. 

8 - luglio/agosto/settembre 1984 - 
Lire 7.000 • Personalizza i messaggi di 
errore dei tuoi programmi • Appliscuola: u- 
na nuova serie di articoli e programmi stu¬ 
diati per la scuola • Le Mans in poltrona • 
Due dita sono sufficienti per scrivere, ma 
con dieci... • Un computer per segretario • 
Trasformate il vostro Apple in un melodio¬ 
so organo • La struttura dei dati: quarta 
puntata del corso di Pascal • La scelta del¬ 
la stampante è importante: se l'accoppia¬ 
ta con il computer è vincente ... • Scritte 
lampeggianti e caratteri che scorrono con 
fApplesoft • Macintosh: 37 nuovi pro¬ 
grammi : tutte le novità del NCC di Las 
Vegas. 

9 - ottobre 1984 - Lire 7.000 • Cin¬ 
que modem per collegarsi con reti e ban¬ 
che dati • Ile contro Ile: fino a che punto 
sono compatibili? • Fuoco fatuo: un adven- 
ture game che mette alla prova anche i 


più esperti • Rotazione e traslazione delle fi¬ 
gure piane e somma delle forze parallele • 
Gerarchia, sequenza e ombra per visualiz¬ 
zare il parentado: quinto appuntamento 
con il Pascal • Come ottenere grandi risul¬ 
tati nella grafica ad alta risoluzione utiliz¬ 
zando un Apple II e un TV color • Una sem¬ 
plice routine per disporre sempre della data 
memorizzata • Macintosh: Guida al- 
TMs-Basic. 

10 - novembre 1984 - Lire 7.000 • 

Una guida per entrare con l’Apple nelle reti 
nazionale e internazionale • L’Apple //c sti¬ 
la una graduatoria delle autovetture d'epo¬ 
ca • Come gestire tre attività professiona¬ 
li diverse con un Apple • Niente paura se i- 
nawertitamente battete New o Fp! • Dos: 
un programma per ritrovare sempre i dati 
che sembrano scomparsi • L'ottava punta¬ 
ta di Applesoft: come mantenere allineate 
le righe • Differenze tra Integer e Appleso¬ 
ft e language card • Parametri, procedure 
e funzioni nella sesta puntata del Pascal • 
Appliscuola: rette nel piano cartesiano, e- 
quazioni e calcolo del coefficiente di correla¬ 
zione • Macintosh: Computerizzate il li¬ 
bro cassa con il Mac. 

11 - dicembre 1984 - Lire 7.000 • U- 

na banca dati per avere sotto controllo un 
articolo, il suo numero di pagina, la rivista 
su cui è stato pubblicato • Per recuperare 
un file cancellato accidentalmente • Tutti i 
trucchi per personalizzare l'Hello o per pro¬ 
teggere i listati da occhi indiscreti • L'Apple 
sulla scrivania: perché non lasciarvi un 
messaggio personalizzato? • Un tastierino 
numerico pronto a entrare in azione • Nella 
versione 1.7 del tal programma avete intro¬ 
dotto una variante, ma dove? Per saperlo 
subito e senza errori... «Tre animali feroci 
vi inseguono: riuscirete a metterli in trappo¬ 
la? • Ultima puntata del corso di Pascal • 
Per risolvere le espressioni in modo da im¬ 
pararle • Macintosh: Novità software e 
hardware. 

12-13 - gennaio/febbraio 1985 - Li¬ 
re 7.000 • Per imparare a giocare a Bri¬ 
dge con l'Apple o perfezionarsi nella dichia¬ 
razione; il computer tiene il punteggio e fa 
da avversario • MicroCalc, un programma 
per capire VisiCalc e i pacchetti simili • Un 
corso chiaro, semplice ed esauriente per 
imparare a usare AppleWorks e VisiCalc: 
in ogni articolo un modello pronto da usare, 
il primo è un budget professionale • Una po¬ 
tente utility che permette l'editing dei pro¬ 
grammi • Con questa utility potete aggiun¬ 
gere a un programma esistente delle istru¬ 
zioni DATA • Appliscuola: animazione di u- 
na rotazione. 

14 - marzo 1985 - Lire 7.000 • Un 

computer per meccanico, che ricorda tut¬ 
te le operazioni di manutenzione • Per tra¬ 
sformare una parola o un disegno in un po¬ 
ster gigante • Un programma per ricreare 
sull'Apple qualunque percorso di Golf ■ Men¬ 
tre imparate Appleworks e VisiCalc pote¬ 
te costruire un utilissimo modello per compi¬ 
lare la nota spese in tre minuti • Un pro¬ 
gramma per imparare a contare in età pre¬ 
scolastica, un altro per ripassare le tabelli- 
ne, un terzo per migliorare l'ortografia • Sti¬ 
ma dei frutteti con l'estimo • Macintosh: 
Comando per comando, potete disegnare 
con uno dei maggiori e più creativi esperti 
del mondo • Grafici a colonna, a torta, a li¬ 
nee ... ecco Mac Chart • Hit parade del 
mese. 

15 - aprile 1985 - Lire 7.000 • Non 

più fogli e foglietti sparsi ovunque, con le vo¬ 
stre preziose ricette di cucina* Per sceglie¬ 
re se la vostra prossima automobile sarà 
diesel o a benzina • Un repertorio di suoni 
e rumori di ogni genere per colonna sonora 
ai vostri programmi • Giocare a volano con 
l'Apple • Un programma per sfruttare le 
qualità grafiche dell'Apple • Un menu pro¬ 
fessionale per i vostri programmi: eviden¬ 
ziate con una barraluminosa il programma 
da far girare • Continua il corso AppleWor- 
ks: il data base • Speciale Appliscuola: un 
diagramma cartesiano per il calcolo del 
massimo comun divisore, e un programma 
di chimica • Macintosh: Fumetti con 


Mac • Magic e File Vision • L'hit parade 
del mese. 

16 - maggio 1985 - Lire 7.000 • Un 

sistema di data base nutrizionale per per¬ 
sonalizzare una dieta bilanciata, a lunga o 
a breve scadenza • Corso AppleWorks: co¬ 
me farsi un'agenda telefonica • Pompieri: 
un gioco d'azione e abilità • Un programma 
capace di trasformare l’Apple II in un fede¬ 
le e preciso timer • Una tavola di disegno 
per emulare i più potenti programmi di 
CAD/CAM • Come scrivere un program¬ 
ma compiuto su una linea sola. Ecco i primi 
venti one-liner • Una utility che facilita il la¬ 
voro di correzione di un listato, rendendone 
più comoda la lettura • Macintosh: Jazz 

• Hit parade del mese. 

17 - giugno 1985 - Lire 7.000 • Le 

principali nozioni, un dizionario nautico e 
due simulatori di regate per entrare nel 
mondo della vela • Un programma che tra¬ 
sforma l'Apple in una sofisticata calcolatri¬ 
ce RPN • Una piantina per pianificare qua¬ 
lunque itinerario stradale americano tra 
ben 171 città diverse • Un uragano si sca¬ 
tena sulla città: riuscirete a trovare rifu¬ 
gio? • In AppleWorks la gestione di un ne¬ 
gozio • Un programma per eseguire analisi 
ai carattere statistico con la possibilità di 
chiedere previsioni • Sparate a vista, ma 
attenti a non essere colpiti! • Continua la 
serie degli One-liner, i programmi su una li¬ 
nea sola • Macintosh: Smooth Talker • 
Hit parade del mese. 

18 - luglio/agosto 1985 - Lire 
7.000 • La versione per Apple di Trivia, il 
gioco che ha stregato mezzo mondo • Con¬ 
tinua il corso AppleWorks con le funzioni 
del word processor • Una utility per perso¬ 
nalizzare il bip segnala errori • Un program¬ 
ma per seguire l'andamento dei propri biori¬ 
tmi mese per mese • Per sapere i consumi 
dell'auto senza affogare in calcoli e fogliet¬ 
ti • Come esaminare l'andamento di un 
grafico di una funzione • Poche linee di pro¬ 
gramma per avere scritte perfettamente 
centrate su video e stampante • ProDOS: 
una utility per imparare a programmare • 
Nuovi one-liner • Macintosh: My Office • 
MacHardware: ThunderScan. 

19 - settembre 1985 - Lire 7.000 

• Oracolo: per non sbagliare quando sono 
in ballo decisioni importanti • Diggere Clau- 
strophobia, due giochi: per marziani soprav¬ 
vissuti il primo, per pacifisti il secondo • Tut- 
ti i segreti per un collegamento in rete per 
5-25 utenti • Tutti i conti dello studio lega¬ 
le: un programma per avvocati scritto da 
avvocati • Per caricare in memoria un pro¬ 
gramma in Applesoft al di sopra di un codi¬ 
ce macchina • Apple Ile più mouse: accop¬ 
piata vincente per i movimenti cassa-ma¬ 
gazzino • Altri cinque one-liner • Inizia una 
serie di articoli sull'uso della grafica ad altis¬ 
sima risoluzione • Macintosh: Microso- 
ftWord è un programma che vale davvero 
la pena di avere • Aggiornatissimo catalo¬ 
go di programmi e accessori. 

20 - ottobre 1985 - Lire 7.000 • Sa¬ 
lute: come ricordare tutte le malattie e re¬ 
gistrare le spese mediche • Come far parla¬ 
re l'Apple Ile • Oroscopo personalizzato 
con grafici della carta del cielo natale • 
Stabilizzatori di corrente per non perdere o- 
re di prezioso lavoro • Dieci one-liner • Ba¬ 
sic Writer consente il collegamento diretto 
tra l'ambiente di elaborazione testo e l'am¬ 
biente Basic • Come controllare il valore di 
una variabile per individuare gli errori • Ecco 
la seconda puntata sull'uso della grafica 
ad altissima risoluzione • Speciale Appli¬ 
scuola: simulazione di un equilibrio • Macin¬ 
tosh: nutrita hit parade del mese. 

21 - novembre 1985 - Lire 7.000 • 

Con AppliArchitet potete arredare la vo¬ 
stra casa con precisione direttamente sul 
video • Grand Prix: una corsa d'auto stile 
arcade in Applesoft • Un modo per accede¬ 
re direttamente alla routine di stampa by 
passando tutto il programma • Controllo di¬ 
retto del cursore • Dieci one-liner 4>er Ap¬ 
ple Il un nuovo, potente foglio elettronico in¬ 
tegrato con grafici e data management • 


Prima puntata di un corso di programma¬ 
zione avanzata in Basic • Terzo articolo 
sulla doppia HFRes: le figure a blocchi ■ 
Macintosh: hard disk a confronto • Con¬ 
tabilità generale o forfettaria: 3 pacchetti 
a confronto • Hit parade del mese. 

22 - dicembre 1985/gennaio 1986 
- Lire 7.000 • Una rassegna completa 
dei tipi di stampante, con Te caratteristi¬ 
che tecniche e le prestazioni, e dei relativi 
accessori e una tabella comparativa di 
trenta macchine provate direttamente • 
Memodesk: non la solita agenda elettroni¬ 
ca ma un calendario intelligente da scriva¬ 
nia • BlackJack • Due programmi per gli 
studi dentistici • Continua il corso ai pro¬ 
grammazione avanzata in Basic • Effetti 
speciali: Spinnerconsente lo scorrimento o- 
rizzontale di una stringa • Dieci one-liner • 
Calendario perpetuo dal 1753 in poi per Ap¬ 
ple e Mac • Quarta puntata di grafica: ani¬ 
mazione • Appliscuola: il numero di Avoga- 
dro • Macintosh: stampare un catalogo 
professionale di alta qualità a costi conte¬ 
nuti • Hit parade con tantissimi nuovi pro¬ 
grammi. 

23 - febbraio 1986 - Lire 7.000 • 

Speciale editoria: Macintosh, Apple II, La¬ 
serWriter e tutto il software necessario per 
creare un centro stampa autonomo • Co¬ 
me programmare il mouse dell'Apple II • 
Guerre stellari • Harmony • Come far scor¬ 
rere 18 immagini sul video • Grafica: scorri¬ 
mento orizzontale di una stringa sul video • 
Corso avanzato di Basic (3) • Sette one-li¬ 
ner • Scuola: resoconto su Pisa • Funzioni 
e grafici tridimensionali • La tavola degli e- 
lementi chimici • Macintosh: la compatibi¬ 
lità Mac-IBM • Tutto sul CFS • L'hit-para- 
de del mese. 

24 - marzo 1986 - Lire 7.000 • Spe¬ 
ciale architetti e ingegneri: tanto software 
per risolvere al computer i problemi di com¬ 
puto e disegno • Executive Cardfile: un ar¬ 
chivio intelligente, organizzato in più sche¬ 
dari • Screen dump a 80 colonne in ogni mo¬ 
mento della programmazione • Apple Mae¬ 
stro insegna a comporre musica anche a- 
gli stonati, e senza fatica • A che ora na¬ 
scono i vostri file? Senza acquistare sche¬ 
de software, chiedetelo al programma Ora 
e data • Archiviare con il mouse, sull'Apple 
II: con Ped-one • Grafica: lo scorrimento 
verticale • Un'agenda elettronica che com¬ 
pone anche il numero • Appliscuola: disegni 
prospettici con rimozione delle parti nasco¬ 
ste e un trivia, per tutte le materie, da im¬ 
postarsi a piacere ■ Macintosh: guida al¬ 
l'acquisto del database giusto • Macnews 

• Tutti i linguaggi per la programmazione • 
Grafici: un programma che sa crearli tutti 

25 - aprile 1986 - Lire 7.000 • Spe¬ 
ciale comunicazioni: modem e banche dati 

• Chart Manager: programma professiona¬ 
le per la gestione dei dati e la restituzione 
grafica in curve, barre e torte • Apple Che- 
cker: controlla gli errori di copiatura dei 
listati* Grafica: la logica di programmazio¬ 
ne in doppia alta risoluzione • Buffer di 
stampa: ricaviamolo dall'Apple • Oneliners 

• Appliscuola: variazioni di velocità in funzio¬ 
ne di concentrazione dei reagenti e tempe¬ 
ratura • Macintosh: ilBernoulli Box, che 
archivia su cartuccia • Macnews • Una da¬ 
tabase veloce, versatile e personalizzato 
da una potente struttura a schede. 

26 ■ maggio 1986 - Lire 7.000 Spe¬ 
ciale: gli spreadsheet più potenti per Apple 
Il e Mac • Meandro: un adventure tutto i- 
taliano • Grafica: altri segreti sull'animazio¬ 
ne in doppia alta risoluzione • Appliscuola: 
per risolvere sistemi di equazioni lineari • 
Ants! Il terrore, con le sembianze di 
gigantesche formiche, viene dal giardino • 
Oneliners • Quale sarà il futuro di Apple II? 
Un'intervista con John Sculley e molte novi¬ 
tà da Cupertino • Macintosh: mettere in 
rete Sunol, il disk server piccolo e potente • 
Mac+//: un programma che simula su 
Mac il video Applesoft? Certo, per utilizza¬ 
re ancora tutta la biblioteca programmi 
del II • Windowd Toolbox, perché ogni pro¬ 
grammatore vorrebbe poter modificare le 
finestre del toolbox • Bioritmi • Macnews. 









Sette minuti 
e la chiave 


del Mac Basic 
Club è tua 


Sette minuti possono aprirti la porta 
di un nuovo mondo: quello dei 
programmi scritti da te come 
servono a te, sulla misura 
delle tue esigenze. Sette minuti 
bastano per decidere di entrare 
nei Club di chi sa ottenere dal 
suo Macintosh esattamente 
quello che vuole. Il Mac Basic Club 
ti offre proprio questo: tutorial in 
italiano, routines, trucchi e segreti, 
suggerimenti, idee. In pratica il Club 
offre tutto il supporto che ti è 
necessario per imparare senza 
fatica il Basic Microsoft. E te lo 
offre gratis se non possiedi ancora il 
Microsoft Basic 2 . 1 . Iscrivendoti al 
Mac Basic Club riceverai infatti, 

m m. m subito e direttamente 
4 , " m I tuo indirizzo, 

^ confezione 

bimestrale su dischetto del 
Mac Basic Club. Gli altri cinque dischetti 
ti verranno spediti via via che verranno 
pubblicati. Ma tu pagherai solo il prezzo 
del Microsoft Basic 2.1, e cioè 327.000 
lire (più Iva 9%). Ma anche se possiedi già 
il Basic puoi iscriverti al Mac Basic Club 
in questo caso riceverai solo i sei numeri 
dei bimestrale su dischetto del Club, e 
pagherai 160.000 lire (più Iva 9%). 

Mac Basic Club è un'iniziativa 
iQ 


TD - 

ernie 

Club 


Microsoft Basic permette di 
programmare in un ambiente 
altamente interattivo, 
sfruttando tutte le potenzialità 
_ di Macintosh: la grafica, 

* il suono, le finestre, i menù. 

Comprende strutture 
di controllo avanzate come le 
istruzioni PRINT USING, 
IF/THEN/ELSE, WHILE/WEND, ecc. 
In più, rispetto al Microsoft Basic 2 . 0 , 
il Microsoft Basic 2.1 è in pratica 
due volte più veloce. 
Ed è sicuramente il 
linguaggio che più 
rapidamente e più 
facilmente ti farà 
ottenere risultati 
davvero 
professionali. 



SOFT » 



rii ih Iscriviti subito. 
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Seguire l'andamento delle vostre attività in borsa? Con questo potente 
programma d'investimenti sono facili l'introduzione e la modifica dei dati, la 
memorizzazione su dischetto e le opzioni di resoconto con grafica e testo. 

Sulle ali del successo 
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Voi e il vostro Mac (ma anche il 
vostro Apple II): una potente coppia 
di esperti nella gestione del portafo¬ 
glio titoli. Come investitore privato 
si parte probabilmente con le miglio¬ 
ri intenzioni di seguire il comporta¬ 
mento dei nuovi titoli acquistati. 
Poi le attività giornaliere fanno sì 
che si perda la traccia, si perda il con¬ 
to e si perda il controllo della pro¬ 
pria posizione. 

Quando arriva l’epoca della dichia¬ 
razione dei redditi, poi, ci si affanna 
per mettere assieme i prospetti di ac¬ 
quisto e di vendita dei valori e per co¬ 
minciare a calcolare quanto si deve 
al fisco. Senza poi dimenticare l'im¬ 
patto dei rendimenti di dividendo e 
delle commissioni d'agente sul rendi¬ 
mento che ci si può attendere dai pro¬ 
pri investimenti. Mettere assieme i 
fatti è nella migliore delle ipotesi un 
fastidio, nella peggiore un incubo. 

Adesso però potete mettere al lavo¬ 
ro il vostro Macintosh con Investor: 
è molto semplice da usare, e le infor¬ 
mazioni che introducete in merito al¬ 
le vostre transazioni sono messe al 
sicuro su dischetto, pronte a essere 
richiamate quando vorrete. Per di più 
l'immissione di qualche semplice da¬ 
to sul movimento delle quotazioni 
dei vostri titoli produce informazio¬ 
ni che potranno aiutarvi a stabilire i 
tempi per importanti decisioni di ac¬ 
quisto e di vendita. 

Per seguire l'andamento dei titoli 
un'immagine vale mille parole. E 
scoprirete che la realizzazione di gra¬ 
fici professionali è un sottoprodotto 
indolore e automatico dell'introduzio¬ 
ne delle informazioni di base sul 
comportamento dei vostri titoli. 

Le caratteristiche di resoconto gra¬ 
fico di Investor comprendono: 


1. Rilevamento dell'andamento di 
massimo, minimo e prezzo di chiu¬ 
sura. 

2. Medie mobili per 13 settimane. 


Figura 1. Introduzione dati valore. 

3. Medie mobili per 52 settimane. 

4. Rilevamento dell'andamento del 
volume settimanale. 

5. Rilevamento dell'andamento del 
volume medio. 

6. Prezzi massimo e minimo per un 
periodo determinato. 

7. Volumi massimo e minimo per 
un periodo determinato. 


Le caratteristiche di resoconto scrit¬ 
to comprendono: 


1. Guadagno/perdita sull'analisi delle 
vendite. 

2. Guadagno/perdita sul prezzo di 
mercato. 

3. Percentuale guadagno/perdita. 

4. Calcolo automatico del guadagno 
a breve e a lungo termine. 

5. Giorni restanti per il guadagno a 
lungo termine. 

6. Stanziamento di commissione 
proporzionalmente distribuito. 

7. Sommari di risultato a breve e a 
lungo termine. 


Le capacità di gestione dati del pro¬ 
gramma vi permettono di: 


1. Aggiungere un investimento. 

2. Modificare un investimento. 

3. Vendere un investimento. 

4. Esaminare il file per la revisione. 

5. Aggiornare i file. 


Come si usa 

• L’introduzione di nuove 
voci - L'uso di Investor è sempli¬ 
cissimo. Il primo elemento della bar¬ 
ra di menù, Nuove Introduzioni, per¬ 
mette di far scendere un menù per: 


1. Comprare un valore (Acquistare) 

2. Vendere un valore (Vendere) 

3. Aggiornare i dati di mercato (Prez¬ 
zo di mercato) 

4. Smettere e andare in Basic 

5. Smettere e passare al sistema 


• L'acquisto di un valore 

- Quando scegliete l'opzione Acqui- 


f 

é Inserire 

Modificare Resoconti 

Esaminare Aggiornare 

Ultimi prezzi di 

mercato 


□ FIAT- 1 

□ FIAT- 2 

□ BNA- 1 

□ GENERA- 1 

□ 1F1 - 1 

[j^BREDR- 1 


Figura 2. Display selezione valore. 
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sto, Investor vi chiede di introdurre 
il nome del titolo da registrare. Se è 
stato fatto un precedente acquisto del¬ 
lo stesso titolo è importante che il 
nome sia scritto con grafia identica a 
quella delle precedenti introduzioni. 
Investor tiene traccia del numero di 
lotto per ogni acquisto (e vendita) 
di modo che le commissioni siano 
assegnate in modo esatto e guadagni 
e perdite delle vendite siano calcolati 
a dovere. 

Investor può gestire 75 valori su 
un Macintosh 128K. Quando viene 
raggiunto il limite di 75 record in 
un file la videata del menù principa¬ 
le visualizza un messaggio a indica¬ 
re che è stato raggiunto il limite. Po¬ 
tete proseguire scegliendo l’opzione 
Passare al sistema e dando altri no¬ 
mi ai file ACQUISTI e VENDITE, 
per esempio ACQUISTI 1 e VENDI¬ 
TE 1 (puntando e facendo clic sui fi¬ 
le ACQUISTI e VENDITE e digitan¬ 
do i nuovi nomi). Poi riavviate Inve¬ 
stor e inizializzerà un secondo e nuo¬ 
vo insieme di file per continuare ad 
aggiungere record al portafoglio. 

Ogni volta che volete usare Inve¬ 
stor con il primo lotto di record non 
avete che da rinominare i correnti fi¬ 
le ACQUISTI e VENDITE chiaman¬ 
doli ACQUISTO e VENDITE2 e ri¬ 
nominare i file originari (che adesso 
si chiamano ACQUISTI 1 e VENDI¬ 
TE 1) ACQUISTI e VENDITE. 

Dopo che avete introdotto il no¬ 
me, Investor esplora il file alla ricer¬ 
ca di altre eventuali voci già introdot¬ 
te. Se trova altri acquisti recupera il 
numero di lotto dell'ultimo acquisto 
precedente e lo incrementa per identi¬ 
ficare il nuovo acquisto. Questo vie¬ 
ne visualizzato in una finestra di edi- 
ting (figura 1) che vi permette di: 


1. Introdurre informazioni sul titolo 

2. Premere il tasto <Tab> o <Re- 
turn> per accettare finformazione 

3. Puntare il mouse e fare clic per 
scegliere specifiche voci 


Se si tratta del primo acquisto che 
fate del titolo Investor assegna un 
uno al numero di lotto dell'ac¬ 
quisto. 

Dovrete limitare la lunghezza dei 
nomi dei vostri valori a sei caratteri 
(perchè stiano nello spazio del pro¬ 
spetto). Le routine di introduzione 
dati di Investor individuano con un 
flag e rifiutano qualsiasi introduzio¬ 
ne più lunga di sei caratteri. Introdu¬ 
cete il numero delle azioni (acquista¬ 


te o vendute) sotto forma di numero 
effettivo di azioni e tutti i dati relati¬ 
vi che vengono chiesti. 

In qualsiasi momento potete punta¬ 
re il mouse su una particolare voce 
per correggerla. Le routine di intro¬ 
duzione dei dati rifiuteranno le intro¬ 
duzioni non valide per le date e le in¬ 
troduzioni di prezzi che superino le 
300000 lire per azione. 

Quando avete finito di introdurre il 
primo titolo viene creato un file nel 
dischetto chiamato file ACQUISTI 
che contiene tutte le informazioni da 
voi introdotte. Per verificare che tut¬ 
te le introduzioni siano state registra¬ 
te in modo esatto scegliete nella bar¬ 
ra del menù l’opzione Esaminare i fi¬ 
le. Inizialmente sarà forse il caso di 
provare Investor con un valore fitti- 
zio o esemplificativo per familiariz¬ 
zarsi con le sue funzioni. 

• La vendita di un valore 
- Per registrare la vendita di un tito¬ 
lo scegliete Inserire sulla barra del 
menù e poi scegliete l'opzione Ven¬ 
dere. Investor visualizza un menù di 
pulsanti che mostrano tutti i nomi e 
i numeri di lotto dei valori contenuti 
nel file ACQUISTI. Vi basta sceglie¬ 
re con il mouse il nome del valore, 
e vengono visualizzate le routine di 
introduzione dei dati, pronte ad acco¬ 
gliere le informazioni sulle vendite. 

Introducete la quantità venduta, il 
prezzo di vendita, la commissione, 
il mese, il giorno e l'anno. Investor 
controlla il numero delle azioni che 
restano nel vostro portafoglio, per 
accertare che non tentiate erronea¬ 
mente di registrare una quantità di 
azioni vendute supcriore al numero 
di quelle in vostro possesso. 

Registrando la vendita, Investor 
esamina la commissione originaria 
pagata al momento dell'acquisto e as¬ 
segna una parte proporzionale della 
commissione d’acquisto alla vendita 
(per sviluppare un ricavo "net net" 
sul vostro costo originario). Riduce 
inoltre del barn montare proporzionale 
l'ammontare della commissione d'ac¬ 
quisto contenuta nel file AC¬ 
QUISTI. 

Poi i dati della vendita vengono re¬ 
gistrati in un file mastro VENDITE. 
Questo file viene usato per il pro¬ 
spetto Guadagno/perdita sulle vendi¬ 
te. Se in un certo periodo di tempo 
vengono fatte transazioni parziali di 
vendita ognuna di esse viene registra¬ 
ta (e riferita) separatamente in modo 
che sì possa mantenere un computo 
esatto dei guadagni e delle perdite ai 


fini della dichiarazione dei redditi. 

• L'aggiornamento dei dati 
di mercato ■ Una delle caratteristi¬ 
che più utili di Investor è la possibi¬ 
lità di seguire e tracciare il movimen¬ 
to di prezzi e volume del vostro por¬ 
tafoglio. Inoltre potete esaminare 
guadagni e perdite "sulla carta" (fitti- 
zi) sulla base delle più recenti quota¬ 
zioni di mercato introdotte per cia¬ 
scun valore nel vostro portafoglio. 
Investor è programmato in modo 
che mantenga un file attivo di rile¬ 
vamento di 52 periodi (corrisponden¬ 
te a un anno di 52 settimane). Come 
regola generale dovrete fare introdu¬ 
zioni sulle attività di mercato una 
volta alla settimana per mantenere 
una base di rilevamento costante del¬ 
l'andamento. 

Per aggiornare il prezzo di mercato 
scegliete nuovamente Inserire sulla 
barra dei menù e poi scegliete l’op¬ 
zione Prezzo di mercato. Come si ve¬ 
de nella figura 2 lo schermo visua¬ 
lizza un gruppo di pulsanti per i va¬ 
lori in vostro possesso. Non avete 
bisogno di ricordare i nomi dei re¬ 
cord che si trovano nei file, in quan¬ 
to Investor visualizza i nomi in un 
menù di pulsanti per la selezione. 
Puntate il mouse sul nome del valo¬ 
re che volete scegliere. Se un qualsia¬ 
si file che usa i pulsanti per la sele¬ 
zione di una voce supera le 51 voci 
compariranno dopo 51 voci altri due 
pulsanti. Il clic sul box dei pulsanti 
arresta l'ulteriore visualizzazione di 
pulsanti e vi permette di puntare e fa¬ 
re clic sulla vostra scelta. Il clic sul 
box Continua pulisce lo schermo e 
presenta le restanti selezioni di re¬ 
cord (a blocchi di 51 record). 

Dopo aver scelto un titolo introdu¬ 
cete il prezzo massimo, il prezzo mi¬ 
nimo, il prezzo di chiusura, il volu¬ 
me delle vendite, il mese, il giorno 
e l'anno (figura 3). Ancora una vol¬ 
ta il programma controlla se ci sia¬ 
no prezzi superiori a 300000 e se le 
introduzioni fatte per la data siano 
valide. Potete puntare e fare clic con 
il mouse su qualsiasi introduzione 
che volete correggere prima che sia 
accolta. 

L'opzione Prezzo di mercato crea 
inizialmente un file con lo stesso 
nome del valore. Le introduzioni suc¬ 
cessive sono aggiunte al file di que¬ 
sto nome di valore e il file costrui¬ 
sce gradualmente una storia comple¬ 
ta dell'attività di prezzo e volume del 
titolo. Questo file viene utilizzato 
dai prospetti Grafico del valore e 
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Guadagno/perdita di mercato per con¬ 
frontare le transazioni d'acquisto ori¬ 
ginarie con il mercato corrente. E' 
molto importante tenere aggiornato 
questo file poiché è la base per tener 
traccia dei risultati dei vostri investi¬ 
menti. 

• L’abbandono del program¬ 
ma - Il menù Inserire offre due 
opzioni per lasciare Investor. L'op¬ 
zione Passare al Basic usa i comandi 
MENU RESET e END per fermare 
il programma e ripristinare la barra 
di menù MS Basic. L'opzione Passa¬ 
re al sistema usa il comando 
SYSTEM per chiudere tutti i file 
aperti e restituire il controllo al 
Finder. 

Modifica di un record 

Qualora facciate un errore nell'in¬ 
troduzione di una transazione di tito¬ 
li o di un'informazione sul prezzo di 
mercato, avete l'opzione di fare l'edi¬ 
ting del, o dei, record. Quando sce¬ 
gliete l'opzione Modificare i file sul¬ 
la barra del menù potete poi sceglie¬ 
re l'opzione Acquistare, Vendere o 
Prezzo di mercato. 


Per tutte e tre le opzioni vengono 
visualizzati i nomi dei titoli in un 
menù di pulsanti. Puntate il mouse 
sul record selezionato, fate clic sul 
pulsante e il record viene recuperato. 

Per la modifica del file dei prezzi 
di mercato scegliete prima il nome 
del titolo. Lo schermo visualizza al¬ 
lora le date delle introduzioni che so¬ 
no state fatte per ciascuna voce di 
prezzo di mercato. Puntate il mouse 
e fate clic sulla data del prezzo di 
mercato selezionato, e il record di 
prezzo/volume viene recuperato per 
l'editing. 

Il display di editing (figura 4) 
permette di saltare i campi di dati 
non interessati premendo il tasto 
<Return> o quello <Tab> per rag¬ 
giungere il campo di editing appro¬ 
priato. In alternativa potete puntare 
direttamente il mouse sul campo, e 
poi effettuare le vostre modifiche. 

Quando avete fatto le modifiche fa¬ 
te clic sul pulsante OK per control¬ 
lare la validità dei campi prima di ri¬ 
memorizzare sul dischetto il record 
modificato. Se avete introdotto dati 
non validi, come un giorno maggio¬ 
re di 31 o un mese maggiore di 12, il 


controllo d'errore vi riporta al box di 
editing, e l'introduzione erronea vie¬ 
ne evidenziata per la correzione. 

L’editing può essere usato anche 
per impostare uno specifico record 
su un valore numerico che possa fa¬ 
re togliere il record dal file mediante 
l'opzione Aggiornare. Per esempio 
se volete cancellare un record di AC¬ 
QUISTI dal file potete scrivere il nu¬ 
mero di azioni a zero e poi usare 
l'opzione Aggiornare per cancellare 
tutti i record di ACQUISTI con zero 
azioni. In alternativa se volete can¬ 
cellare un record di VENDITE potete 
impostare la data di vendita su una 
vecchia data, come 1/1/50, e poi eli¬ 
minare tutti i record VENDITE con 
date anteriori a 1/2/50 (2 gennaio 50 
nella grafia americana di mese, gior¬ 
no, anno). 

Aggiornamento e opzioni 

Di tanto in tanto è importante 
sgomberare dal file le transazioni 
che non sono più attive. Per esem¬ 
pio dopo aver completato la dichiara¬ 
zione fiscale per un determinato an¬ 
no sarà il caso di sbarazzarsi dei re- 
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é Inserire Modificare Resoconti Esaminare Rggiornare 


Ultimi prezzi di mercato 

(Tab/Return/Mouse per Seleziona 

Nome 

IFI| 

Prezzo Mass. 

27500| 

Prezzo Min. 

27 1 00| 

Prezzo Chius. 
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Vendite (/100) 

1 io| 

Giorno 1-31 

1 «1 

Mese 1-12 

1 9| 

Anno 01-99 

1 NI 

[ 01^ ) (Annulla) 


Figura 3. Aggiornamento dati di mercato. 


cord di titoli con zero azioni e dei 
vecchi record di vendite, e questo per 
evitare di riempire il dischetto. 

Quando scegliete sulla barra di me¬ 
nù l'opzione Aggiornare i file sce¬ 
gliete poi l'opzione Acquisto, quella 
Vendere o quella Prezzo di mercato. 
La scelta dell'opzione Acquistare fa 
apparire sullo schermo il seguente 
messaggio: 


Questa scelta aggiorna il Portafo¬ 
glio. 

ATTENZIONE: Stampa prima i pro¬ 
spetti Resoconti Vendite e di Merca¬ 
to per salvare tutti i dati. 


E' buona prassi finanziaria stampa¬ 
re su carta un insieme completo dei 
prospetti di Investor prima di aggior¬ 
nare i file, in modo di avere una co¬ 
pia stampata delle informazioni con¬ 
tenute nei file. 

La scelta dell'opzione Vendita vi¬ 
sualizza il seguente messaggio: 


Questa opzione aggiorna le vecchie 
registrazioni delle Vendite, in riferi¬ 
mento al GIORNO, MESE, e AN¬ 
NO specificati. 

Esempio: se indicate 1,1,85 come da¬ 
ta di riferimento, saranno cancellate 
tutte le Vendite antecedenti quella 
data. 


La scelta dell'opzione Prezzo di 
mercato produce il messaggio: 


Questa scelta cancella i record nel fi¬ 
le "PREZZI DI MERCATO" ecce¬ 
denti i 52 record. 


Esempio: se il file contiene 55 re¬ 
cord, verranno cancellati i record n.l - 
3 e riscritto un nuovo file di 52 re¬ 
cord con inizioda n. di record 40. 


Per quanto il prospetto Grafico del 
valore selezioni e visualizzi i 52 re¬ 
cord più recenti nel file del prezzo di 
mercato il file del prezzo di mercato 
per un qualsiasi valore dato può accu¬ 
mulare un conto di record molto su¬ 
periore a 52 record. E' buona idea ag¬ 
giornare il file dei prezzi di mercato 
ogni tre-sei mesi per sbarazzarsi dei 
vecchi record e liberare spazio sul di¬ 
schetto. 

Una verità fondamentale negli in¬ 
vestimenti è che non si ha un profit¬ 
to fino a quando non si vende effetti¬ 
vamente un titolo. Il prospetto Gua¬ 
dagno/perdita di mercato (figura 5) 
può essere uno strumento importan¬ 
te per valutare la posizione del vo¬ 
stro portafoglio allo scopo di prende¬ 
re decisioni di vendita. Il prospetto 
usa i file ACQUISTI e prezzo di 
mercato per calcolare, sulla base dei 
più recenti dati di prezzo di mercato 
introdotti nel sistema, il guadagno o 
la perdita che avrete vendendo un va¬ 
lore. Il prospetto mostra guadagno o 
perdita sia assoluti sia in percentuale 
della vendita prevista. Mostra anche 
il guadagno o la perdita con e senza 
le commissioni detratte dal previsto 
ricavato della vendita (dato che le 
commissioni non sono detraibili dal 
guadagno tassabile, ma sono un co¬ 
sto reale della transazione). 

Di particolare interesse sono le co¬ 
lonne del prospetto intestate GR 


(giorni restanti) e B/L. La colonna 
GR mostra il numero dei giorni che 
mancano perchè l’investimento si 
qualifichi per il trattamento fiscale 
del plusvalore a lungo termine. Que¬ 
sto si basa su un calcolo del numero 
dei giorni intercorsi fra la data d'ac¬ 
quisto e la data dei più recenti dati di 
prezzo di mercato (per quel valore) 
introdotti nel sistema. Il numero 
viene poi confrontato con 365 gior¬ 
ni (12 mesi) per determinare il nume¬ 
ro dei giorni restanti per la qualifica¬ 
zione a lungo termine. 

La colonna A/V mostra lo stato ac¬ 
quistato/venduto di ciascun investi¬ 
mento. La colonna B/L mostra lo 
stato corrente (guadagno o perdita di 
capitale a breve e a lungo termine) 
degli investimenti posseduti. Poi 
guadagni e perdite a breve e a lungo 
termine vengono compendiati per 
l’intero portafoglio alla fine del reso¬ 
conto. 

Quando scegliete il prospetto Gua¬ 
dagno/perdita di mercato avete l'op¬ 
zione di visualizzarlo sullo schermo 
o stamparlo sulla stampante. Se sce¬ 
gliete la visualizzazione sullo scher¬ 
mo il programma fa una pausa dopo 
che è stata riempita (con nove titoli) 
ciascuna videata. Potete continuare 
il prospetto, stampare la videata o 
cancellare e tornare al menù. Se pro¬ 
seguite la visualizzazione lo scher¬ 
mo si pulisce, presenta i nove valori 
seguenti del vostro portafoglio e con¬ 
tinua il ciclo. Alla conclusione del 
resoconto sullo schermo avete l'o¬ 
pzione di inviare il display finale al¬ 
la stampante. 

Il prospetto Guadagno/perdita sul¬ 
le vendite è soprattutto utile all'epo¬ 
ca della dichiarazione dei redditi, poi¬ 
ché compendia tutte le informazioni 
occorrenti per la dichiarazione. Il pro¬ 
spetto legge ciascun record nel file 
VENDITE e lo mette a confronto 
con il corrispondente record del file 
ACQUISTI per calcolare il guada¬ 
gno o la perdita. Mostra anche se cia¬ 
scuna transazione di vendita sia sog¬ 
getta a plusvalore a breve termine o 
a lungo termine. Infine mostra il 
guadagno o la perdita in assoluto e 
in percentuale della transazione di 
vendita e un guadagno o una perdita 
"net net" sulla base della detrazione 
della commissione di vendita e di 
una parte proporzionale della com¬ 
missione di acquisto per ciascun va¬ 
lore. 

L’opzione Grafico valore dà un qua¬ 
dro completo dell’attività di prezzo e 






































Progra n1fpaperl 


Chiunque abbia dimestichezza con il Macintosh sa perfettamente che Microsoft Word è di gran lunga il miglior 
programma di elaborazione testi disponibile. 

Non è necessario, per apprezzare la potenza di Word, essere un romanziere alle prese con una storia di 400 pagine: è 
sufficiente non voler investire il proprio tempo su programmi meno efficienti e, oltretutto, più complicati da usare. 
Basta lavorare su più documenti contemporaneamente, componendo ad esempio una relazione con parti di altre già 
scritte in precedenza, oppure inviare una lettera circolare, combinando il testo con la lista degli indirizzi, o gestire, con 
una gamma impareggiabile di possibilità, una stampante laser. 

Per non parlare della possibilità di crearsi un Glossario, cioè un archivio di parole o frasi di uso ripetitivo, da richiamare 
con un solo tasto. 

Queste caratteristiche, e molte altre ancora, come la sua sorprendente semplicità di uso, fanno di Word la scelta per 
eccellenza per chi sappia di volere il meglio, e non esiti di fronte ad esso. 

Microsoft Word è disponibile presso tutti gli Apple Centers ed i Distributori Autorizzati Microsoft. 


Potenza e semplicità. Insieme. 

MICROSOFT S.p.A. - 20093 Cologno M s . e (MI) - Via Michelangelo. 1 
tei. (02) 2549741 r.a. - fax (02) 2549745 
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Modificare file Mercato: FIAT 

(Tab/Return/Mouse per Seleziona 

Nome 

FIAT| 1 

Prezzo Mass. 

15800(| 

Prezzo Min. 

15200| 

Prezzo Chius. 

15700| 

Vendite (/100) 

10| 

Giorno 1 -31 

7| 

Mese 1-12 

II 

Anno 01-99 

86| , 

( OK ] [Annulla] 


Figura 4. Display di editing. 


di volume di un determinato valore. 
Investor mette automaticamente in 
scala gli assi del prezzo e del volu¬ 
me, sulla base dei livelli massimo e 
minimo di questi elementi durante il 
periodo che viene tracciato. L'attivi¬ 
tà dei titoli di prezzo più basso vie¬ 
ne amplificata per mostrare l'attività 
di mercato. Nella metà superiore del 
display i prezzi massimo e minimo 
del periodo sono visualizzati come 
barre verticali. 

I prezzi di chiusura del periodo so¬ 
no indicati come punti all’interno 
dell'estensione massimo/minimo: 

Vengono calcolate due medie mo¬ 
bili per l’investimento. La media 
mobile di 13 settimane (o 13 giorni) 
riprendedallatredicesima introduzio¬ 
ne fatta per quel valore nel file del 
prezzo di mercato. Essa è molto sen¬ 
sibile alle fluttuazioni di prezzo e tie¬ 
ne dietro molto da vicino alle varia¬ 
zioni di prezzo. 

La media mobile di 52 settimane 
(o 52 giorni) rappresenta una media 
scorrevole e ponderata dell'attività di 
prezzo. Investor è congegnato per 
tracciare il diagramma di un investi¬ 
mento lungo un periodo di 52 setti¬ 
mane, e sceglie automaticamente per 
fare questo grafico i 52 record più re¬ 
centi. I record precedenti rimangono 
nel file (fino a quando vengono eli¬ 
minati), e potete decidere se svilup¬ 
pare un vostro programma personale 
per analizzare le fluttuazioni storiche 
di prezzo a termine più lungo. 

Immediatamente sotto il diagram¬ 
ma dei prezzi viene tracciato il volu¬ 
me delle vendite'(in centinaia di azio¬ 


ni). La scala viene automaticamente 
adattata a gestire i volumi massimo 
e minimo durante il periodo. In ag¬ 
giunta viene calcolata e visualizzata 
una media mobile del volume delle 
vendite. Infine il grafico visualizza i 
dati statistici vitali che sono stati 
utilizzati per il tracciamento: prezzo 
massimo/minimo/ultimo, data più 
recente, volume medio, media mobi¬ 
le per 13 settimane e media mobile 
per 52 settimane. 

Il pregio del diagramma del valore 
sta nella sua chiara rappresentazione 
in forma grafica di prezzi, volumi, 
medie e loro relazioni. L'analisi eco¬ 
nomica classica tende a dare impor¬ 
tanza a indicatori quali: 


1. Il rialzo o il ribasso dei prezzi a 
un volume supcriore alla media. 
Questo può indicare un avvenimento 
di cronaca che sta causando un'attivi¬ 
tà accelerata di mercato. 

2. La salita o la discesa dei prezzi 
a un volume inferiore alla media. 
Questo può segnalare un titolo tenu¬ 
to stretto, con oscillazioni dei prezzi 
a una modesta attività. 

3. La discesa della media mobile 
di 13 settimane sotto la media mobi¬ 
le di 52 settimane. Questo può esse¬ 
re segno di un deterioramento in cor¬ 
so nella posizione fondamentale del 
valore. Per contro una media mobile 
di 13 settimane che eccede in conti¬ 
nuazione l'indicatore delle 52 setti¬ 
mane può significare che un titolo 
si sta portando a un nuovo e più ele¬ 
vato livello di stabilità. 

4. Con una copia stampata del gra¬ 


fico potete usare un righello per trac¬ 
ciare i prezzi massimo e minimo in 
una tendenza al rialzo o al ribasso. 
Questo stabilisce un canale dell'atti- 
vità di mercato. 

5. Configurazioni costanti dei prez¬ 
zi di chiusura nelle vicinanze del 
prezzo minimo (o massimo) posso¬ 
no indicare una debolezza (o forza) 
del mercato e un trend crescente. 


Riassumendo, il grafico del valore 
è un prezioso strumento per seguire 
e analizzare l'attività di mercato di 
ciascun valore. 

E’ una caratteristica automatica di 
resoconto quando si introducono le 
informazioni per la dichiarazione dei 
redditi. 

Esame del file 

Questa opzione di resoconto è pre¬ 
sentata come revisione dei file di In¬ 
vestor. Il resoconto non fa che river¬ 
sare sul video o sulla stampante il 
contenuto di ciascun record del file 
selezionato (figura 6). 

Potete usare l'opzione per control¬ 
lare se le vostre introduzioni sono 
esatte o se hanno bisogno di modifi¬ 
ca. La si può usare anche per creare 
una documentazione stampata dei 
propri file prima di eliminare i re¬ 
cord non desiderati. 

Il prospetto rivela anche la struttu¬ 
ra dei record contenuti nei file. I file 
ACQUISTI e VENDITE contengo¬ 
no questi campi (nelfordine): 

Nome 

Lotto 

Quantità 

Prezzo/Azione 

Commissione 

Giorno 

Mese 

Anno 

Il file del prezzo di mercato (per 
ciascun valore) contiene: 

Nome 

Prezzo massimo 
Prezzo minimo 
Prezzo di chiusura 
Vendite (in centinaia) 

Giorno 

Mese 

Anno 

Noterete che tutti i file contengo¬ 
no record con otto campi. E’ questa 
una parte importante della configura¬ 
zione del programma, poiché permet¬ 
te a Investor di usare un gruppo co¬ 
mune di routine di accesso al dischet¬ 
to per i tre diversi file. 


48 






































Inserire Modificare Resoconti Esaminare Aggiornare 


Selezionare dove si desidera l'Uscita 


( Uideo [ [ Stampante]! Rnnulla ) 

_ * _ 

Figura 5. Prospetto Guadagno/perdita mercato. 


Come funziona 
il programma 

Il primo passo del programma è 
l’allestimento della finestra che vie¬ 
ne usata per la maggior parte delle 
visualizzazioni. Viene avviato nella 
routine SETUP, e assegna la fine¬ 
stra e il titolo. I parametri usati da 
WINDOW 2 allocano l'intero scher¬ 
mo alla finestra. 

Poi il programma assegna i nomi 
dei file alla variabile FIS(x). Inve- 
stor è stato congegnato per l'uso di 
routine di input/output a file comu¬ 
ne in modo che sia possibile indiriz¬ 
zare i file con i loro nomi di variabi¬ 
le. Così si semplifica la programma¬ 
zione e si rende più compatto il pro¬ 
gramma. Durante l’allestimento il 
programma apre il file ACQUISTI e 
legge i nomi e i numeri di blocco 
di tutti i valori contenuti nel file. 
Questi nomi vengono assegnati alle 
variabili I$(x) e I(x) che sono usate 
perchè i vari menù a pulsante scelga¬ 
no i valori per l’elaborazione e l’edi¬ 
ting. 

Il programma è automaticamente 
dimensionato (DIM) in modo che 
contenga tutti i record che si trovano 
presentemente nel file ACQUISTI. 
Alla conclusione di ogni nove intro¬ 
duzioni o resoconti il programma si 
pulisce (CLEAR) e si ridimensiona 
per gestire il file in espansione. 

La routine denominata MNU predi¬ 
spone la barra di menù. Il formato 
è: MENU x,y,z, "intestazione”, do¬ 
ve x è la posizione orizzontale del ti¬ 
tolo nella barra di menù (1-5) e y è 
la posizione verticale di una voce di 
menù all’interno della barra di menù. 
Quando y è a zero specifica l'intesta¬ 
zione visualizzata nella barra. Il valo¬ 
re di z indica se la voce di menù è at¬ 
tiva (con il valore di uno). Noterete 
che MENU 1,4,0,"-" è la sola voce 
inattiva del menù. Si tratta di un pic¬ 
colo trucco che mette una fila di li¬ 
neette attraverso il menù Inserire 
per separare le opzioni attive da quel¬ 
le di abbandono. 

In riconoscimento del fatto che la 
maggior parte delle voci di menù im¬ 
plica la selezione di uno dei tre file 
di Investor, i nomi di file sono asse¬ 
gnati a variabili che sono attivate 
nella routine MDRW (disegna il me¬ 
nù). La routine CHECK controlla se 
sia stata selezionata una voce di me¬ 
nù e innesca il programma perchè va¬ 
da alle routine di programma che 
svolgono i compiti scelti. La routi¬ 


ne MI seleziona le varie opzioni nel 
menù Inserire. La routine M2 sele¬ 
ziona le opzioni nel menù Modifica¬ 
re i file, e così via. 

La routine IDLE è interessante per¬ 
chè fa uso del comando SCROLL 
dcll'MS Basic per far scorrere avanti 
e indietro il display di selezione del 
menù mentre il programma attende 
la scelta di un menù. L'area da far 
scorrere era stata stampata in prece¬ 
denza nelfallestimento e il comando 
SCROLL definisce l'area fisica della 
videata che dev'essere mossa. Notate 
che ogni esecuzione del loop IDLE 
cambia la direzione dello scorrimen¬ 
to cambiando il valore di QQ da -1 
a +1 e poi al contrario. 

La routine RTS viene usata per la¬ 
sciare il programma e tornare al me¬ 
nù MS Basic. La routine SYST è 
usata per lasciare il programma e tor¬ 
nare alla scrivania. 

Acquisto di un valore 

La routine BUY fa uso di un certo 
numero di subroutine utilizzate da al¬ 
tre opzioni del programma. Esamine¬ 
remo qui le subroutine e poi ci riferi¬ 
remo a esse descrivendo gli altri con¬ 
trolli di menù. 

Quando si seleziona la routine 
BUY viene assegnata a HDS un tito¬ 
lo di intestazione. Alla variabile di 
identificazione del file, X, viene asse¬ 
gnato il valore di uno (a indicare che 
l'attività avverrà con il file ACQUI¬ 
STI) e viene attivata la subroutine di 
introduzione dei dati. 

• Introduzione dei dati - La 


subroutine di introduzione dei dati 
(DENTRY) effettua l’opzione di ac¬ 
quisto, l'opzione di vendita, gli ag¬ 
giornamenti del prezzo di mercato e 
tutto l’editing. Essa predispone la 
propria finestra, WINDOW 3, che 
viene usata per introdurre o modifica¬ 
re i dati in rettangoli specificati siti 
all'interno della finestra. Le etichette 
che vengono usate per i rettangoli 
sono determinate dalla variabile di 
identificazione del file, X (1 = acqui¬ 
sto; 2 = vendita; 3 = prezzo di mer¬ 
cato). 

La routine NTRY è la sostanza del¬ 
la subroutine. Il formato del coman¬ 
do è: 


CAMPO DI EDITING I, A$(I), 
(XI,Yl) - (X2,Y2), T, J 


I identifica il numero del campo e 
la posizione nella sequenza da scrive¬ 
re. A$(I) è la matrice che contiene i 
dati che vengono introdotti da tastie¬ 
ra. Le variabili (X1,Y1)-(X2,Y2) de¬ 
finiscono la posizione fisica del 
campo di editing. T definisce il for¬ 
mato di editing. Per Investor abbia¬ 
mo scelto il formato 1, che disegna 
un riquadro attorno all'area di editing 
e respinge il tasto <Rcturn> come 
introduzione di editing (per quanto 
lo si possa usare per segnalare che 
un'introduzione è stata completata). 
Infine J definisce i parametri di giu¬ 
stificazione (1 = giustificazione a si¬ 
nistra, 2 = testo centrato, e 3 = giu¬ 
stificazione a destra). Noi abbiamo 
selezionato l’opzione 3 per giustifica¬ 
re a destra l’introduzione del testo. 
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Inuestor 

01-01-1980 
Scan ACQUISTO 


Ree 

Home 

Lotto 

Qtò 

Prezzo 

Comm 

G i or 

MeseAnno 

1 

F*l AT 

1 

1000 

14405.00 

0.00 

1 

5 

86 

2 

FIAT 

2 

500 

14800.00 

0.00 

5 

6 

86 

3 

BNA 

1 

1000 

3225.00 

0.00 

1 

5 

86 

4 

GEMERÀ 

1 

100 

143050.00 

0.00 

5 

6 

86 

5 

IFI 

1 

500 

26600.00 

0.00 

5 

7 

86 

6 

BREDfl 

1 

1000 

10380.00 

0.00 

3 

5 

86 


* 


(Stampante)! Annulla ) 


Figura 6. Display esplorazione file. 


Il loop iniziale predispone l'intera 
finestra di editing in modo che possa¬ 
no essere introdotti o modificati sin¬ 
goli campi. Una volta completato 
l'allestimento la routine IDLE2 prov¬ 
vede al monitoraggio del sistema, at¬ 
tendendo che venga fatta un'introdu¬ 
zione. E' la funzione DIALOG(O) a 
compiere il monitoraggio. Quando 
D=l, è stato premuto un pulsante 
(OK o Cancella) e il programma con¬ 
trolla le introduzioni che sono state 
fatte. Quando D=2, è stato usato il 
mouse per selezionare un campo, e 
il campo di editing scelto viene atti¬ 
vato. Quando D=7 o D=6, è stato 
premuto il tasto <Tab> o il tasto 
<Return>, e viene attivato il succes¬ 
sivo campo di editing della se¬ 
quenza. 

Quando sono state fatte le introdu¬ 
zioni appropriate un clic sul pulsan¬ 
te OK invia il programma alla routi¬ 
ne ECHK per la valutazione delle in¬ 
troduzioni ai fini della validità. Gli 
errori scattano in presenza di: un no¬ 
me di più di sei caratteri; un’introdu¬ 
zione alfabetica in un campo esclusi¬ 
vamente numerico; un prezzo di 
chiusura situato fuori dell'estensione 
massimo/minimo; un'estensione di 
prezzi massimo/minimo che eccede 
100000; un prezzo di titolo che supe¬ 
ra 300000; un giorno che è 0 o mag¬ 
giore di 31; un mese che è 0 o mag¬ 
giore di 12; un anno che è 0 o mag¬ 
giore di 99; o una quantità di titoli 
venduti che supera il numero delle 
azioni possedute. 

Se viene individuato un errore vie¬ 
ne riattivata la routine DENTRY e 


viene selezionato il primo campo 
che è in errore. E' visualizzato alla 
base dello schermo un messaggio 
che segnala la categoria dell'errore ac¬ 
caduto. Quando è stata fatta l'introdu¬ 
zione esatta e si fa clic sul pulsante 
OK viene eseguito nuovamente il 
controllo d'errore e gli eventuali erro¬ 
ri restanti sono intrappolati in ma¬ 
niera analoga. Quando tutte le intro¬ 
duzioni hanno superato con successo 
il controllo d’errore il programma 
toma alla routine che lo aveva chia¬ 
mato. 

• Salvare i dati in un file 

- Dopo l'introduzione dei dati di ac¬ 
quisto per un nuovo valore, la routi¬ 
ne BUY esplora tutti i valori del por¬ 
tafoglio per vedere se siano stati fat¬ 
ti acquisti in precedenza. Se esiste 
nel file un nome identico il numero 
di blocco della nuova introduzione 
viene automaticamente incrementato 
di uno per differenziare il nuovo ac¬ 
quisto. Il passo seguente consiste 
neU’immagazzinare le informazioni 
nel file ACQUISTI del dischetto. 
Come ricorderete la variabile X defi¬ 
nisce il file ACQUISTI per le opera¬ 
zioni su disco. Il programma va alla 
subroutine OPFILE per predisporre 
il file per ricevere i dati. Vengono as¬ 
segnati il nome di file, FI$(S), e il 
numero di file, X, e vengono allesti¬ 
ti i campi con i comandi FIELD 
#X. Si noti anche che l’aggiunta del¬ 
la specificazione LEN all'apertura 
del file lo stabilisce come file ad ac¬ 
cesso casuale con una lunghezza di 
record di 44 caratteri (la somma delle 
lunghezze di record che seguono). 


Il campo B$(l) contiene il nome 
del valore ed è limitato a sei caratte¬ 
ri. I campi B$(2)-B$(5) possono con¬ 
tenere dati di prezzo e/o di volume e 
hanno un'allocazione di otto caratteri 
perchè vi possano essere contenuti 
valori fino a 99,999.99. I campi 
B$(6)-B$(8) hanno un’allocazione di 
due caratteri ciascuno, in quanto con¬ 
tengono il mese, il giorno e l’anno. 

Noterete che l'allestimento dei re¬ 
cord è scisso in due linee. Questo 
può essere fatto specificando il pri¬ 
mo campo della seconda linea come 
campo fittizio di 38 caratteri (la som¬ 
ma delle lunghezze dei cinque campi 
contenuti nella prima linea). Ciò è 
utile per specificare record molto lun¬ 
ghi in linee di programma multiple 
al fine di avere listati di programma 
più compatti. 

Il passo successivo è l'impacca- 
mento dei dati di DENTRY in un 
formato che possa essere salvato su 
dischetto. Vi si provvede nella su¬ 
broutine PACK. 

I campi che contengono prezzi e 
costi sono impostati su espressioni 
a doppia precisione con i comandi 
d'impaccamento MKD$. I campi per 
le date sono impostati su espressio¬ 
ni intere. 

I comandi LSET trasferiscono i da¬ 
ti nel buffer disco di file ad accesso 
casuale in preparazione del salvatag¬ 
gio dei dati sul dischetto. L’impie¬ 
go di variabili a matrice per i dati 
permette che il trasferimento ai e dai 
buffer dei file ad accesso casuale sia 
fatto con semplici loop FOR- 
NEXT. Infine i dati sono scritti sul 
dischetto con il comando PUT #1, 
NR (dove NR è il numero del re¬ 
cord), e il file viene chiuso. Questa 
sequenza di gestione del file è ripetu¬ 
ta nelle altre routine che accedono al 
disco. I passi basilari sono: 


1. Il file è identificato dalla variabile 
X. 

2. Il file è aperto con la routine 
OPFILE. 

3.1 dati sono impaccati nel buffer di¬ 
sco con la routine PACK. 

4. Il record è scritto sul dischetto. 


Vendita di un valore 

La vendita di un valore chiama in 
gioco diverse delle stesse subroutine 
che abbiamo appena utilizzato nella 
routine BUY. Il primo passo nella 
vendita di un valore è però l’esame 












// dischetto Xidex è /Inumerò uno 
per molte buone ragioni. 



Per ia precisione diciotto. 


Ben 18 infatti sono i tests che un di¬ 
schetto deve superare per potersi chia¬ 
mare Xidex. Controlli di qualità accurati 
e severi che garantiscono un livello fi¬ 
nale di prestazioni molto superiore a 
quello richiesto dalle norme ANSI, EC- 
MA, ISO, JIS, IBM e SHUGART. 
Prendiamo ad esempio la tolleranza ac¬ 
cettata nel diametro interno del foro 
centrale del disco: la Xidex l’ha ridotta 
del 50%, da 0,001” a 0,0005”. Ne con¬ 
segue una precisione quasi assoluta. 
Ma non basta. I dischetti di precisione 


Xidex hanno una superficie extra liscia 
ed un nuovo rivestimento in PVC da 10 
mil con uno spessore superiore dei 
33% agli standard. Il che significa una 
vita più lunga ed una protezione totale 
dalle contaminazioni. • 

La forza e la chiarezza del segnale di¬ 
pendono poi dalla esclusiva formula 
magnetica, che da una risposta supe¬ 
riore del 20% alla me¬ 
dia industriale. 

E ancora, i dischetti Xi¬ 
dex hanno il miglior 


substrato in poliestere disponibile sul 
mercato e-quindi resistenza e durata 
eccezzionali. Del resto da un’azienda 
che è leader mondiale nella tecnologia 
del coating non ci si poteva aspettare 
niente di meno che un leader a prova 
di errore come il dischetto Xidex, che 
ha tutte le ragioni per essere il numero 
uno sul mercato e tutte le intenzioni di 
continuare ad esserlo per il futuro. 



s.p.a. -20144 MHano-Via Boni, 29 

102/4988541-telex324426MEE-ltalia 
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Parliamone insieme. 










del portafoglio per la selezione di un 
nome di valore. 

Questa funzione è adempiuta nella 
subroutine STKMNU. 

Anzitutto il file viene controllato 
in CHKREC per accertare che ci sia¬ 
no record nel file. Se ci sono record 
la routine CHKREC provvede anche 
a restituire il numero dei record pre¬ 
senti nel file. Poi viene eseguita la 
routine OPFILE per aprire il file e 
predisporre il buffer di input. L’iden¬ 
tificatore di file (X=l) si predispone 
a leggere il file ACQUISTI in modo 
che possiamo costituire un menù dei 
valori esistenti nel portafoglio. 
Ogni record del file ACQUISTI vie¬ 
ne letto mediante il comando GET 
#X. 

Dopo ogni comando GET i dati 
vengono trasferiti dal buffer disco 
(mediante la subroutine UNPACK) 
alle variabili usate dal programma. 
La variabile di flag (EF) è zero, e 
questo fa sì che il nome e il numero 
di blocco siano combinati in una va¬ 
riabile di pulsante del menù. A ma¬ 
no a mano che ciascun record viene 
letto, viene visualizzato come pul¬ 
sante sullo schermo nella routine 
BTN. Quando è stato letto l'intero fi¬ 
le lo schermo visualizza un inventa¬ 
rio dei valori per nome e numero di 
blocco. A questo punto potete sele¬ 
zionare il valore in vendita semplice¬ 
mente puntando il mouse sul nome 
del valore e facendo clic sul pulsan¬ 
te. La variabile N contiene allora il 
numero di record del valore che è sta¬ 
to selezionato (N = DIALOG(O)). 
Per riassumere, la routine 
STKMNU visualizza il portafoglio 
come menù di pulsanti e ritorna con 
il numero di record del valore che è 
stato selezionato. 

Adesso siamo pronti a introdurre i 
dati delle vendite. A questo provvede 
la subroutine DENTRY che abbia¬ 
mo appena esaminato nella routine 
ACQUISTI. Dato che i formati di re¬ 
cord nei file ACQUISTI e VENDI¬ 
TE sono identici la routine di intro¬ 
duzione dei dati può essere utilizzata 
senza cambiamenti. La differenza 
fondamentale nell'introduzione dei 
dati è che la quantità del valore pos¬ 
seduta è confrontata con il numero 
delle azioni che vengono vendute. 
Qualora la vendita sia tale che supe¬ 
rerebbe la quantità posseduta viene 
visualizzato un messaggio d'errore e 
l'introduzione viene respinta. 

• Cambiamenti di file - Sup¬ 
ponendo che la vendita sia valida e 


la quantità sia esatta, la quantità pos¬ 
seduta viene ridotta della quantità 
venduta. In aggiunta Investor calcola 
la percentuale dei titoli posseduti 
che è stata venduta e detrae una pcr- 
ccntualcproporzionalmcntedistribui- 
ta della commissione d'acquisto, che 
aggiunge alla commissione di vendi¬ 
ta (per realizzare una commissione 
cumulativa per la transazione di ven¬ 
dita). Questo ammontare proporzio¬ 
nale di commissione viene poi detrat¬ 
to dalla commissione che è imma¬ 
gazzinata nel file ACQUISTI per il 
valore selezionato. 

Per esempio se possedete 100 azio¬ 
ni di un valore denominato ABC 
CO che aveva una commissione d'ac¬ 
quisto di 10.00, e vendete 50 azioni 
per una commissione di vendita di 
7.50 ecco i calcoli: 


1. E' stato venduto il cinquanta per 
cento della disponibilità del titolo. 

2. La commissione d'acquisto è ridot¬ 
ta del 50% a 5.00. 

3. La parte della commissione d'ac¬ 
quisto attribuibile alla vendita, 5.00, 
viene aggiunta alla commissione di 
vendita di 7.50. 

4. Il file ACQUISTI per ABC CO 
contiene adesso 50 azioni con una 
commissione d'acquisto residua di 
5.00. 

5. Il file VENDITE per ABC CO 
contiene adesso 50 azioni, con un co¬ 
sto totale di commissione di 12.50 
(= 5.00 + 7.50). 


Quando i calcoli sono stati com¬ 
pletati il record ACQUISTI riveduto 
viene riscritto nel file ACQUISTI. 
Poi viene aggiunto un record della 
vendita alla fine del file VENDITE. 
Ciò viene fatto con il comando: 


NS= LOF(2)/44: NS= NS+1 


che calcola il numero dei record nel 
file VENDITE (NS) dividendo la lun¬ 
ghezza del file (LOF) per la lunghez¬ 
za di 44 caratteri del record. Poi NS 
è incrementato di uno e il numero 
di record è usato per mettere il nuo¬ 
vo record alla fine del file. 

I passi per impaccare (PACK) e 
scrivere (PUT) il record nel file 
VENDITE sono compiuti con le 
stesse routine usate per l'acquisto di 
un valore, impostando su due la va¬ 
riabile di identificazione del file, X. 
Ciò fa sì che venga selezionato il fi¬ 
le VENDITE nelle routine di disco 
comuni. 


Costruire i file 
di prezzo di mercato 

Ai file di prezzo di mercato viene 
dato il nome del rispettivo valore, e 
c'è un file per ciascun nome di valo¬ 
re. La routine MKT usa prima la su¬ 
bornine STKMNU per selezionare il 
nome e il numero di record di un va¬ 
lore daH'inventario dei valori posse¬ 
duti. Questo nome viene poi usato 
per denominare un file con il coman¬ 
do FI$(3)= I$(N). Si possono poi 
usare le routine di file comuni sem¬ 
plicemente impostando su tre l'iden¬ 
tificatore di file X per indirizzare il 
nome di file appropriato. 

Con il comando LOF viene calco¬ 
lato il numero dei record esistenti 
nel file selezionato, e poi viene usa¬ 
ta la routine DENTRY per introdur¬ 
re i dati. In questo caso i campi esi¬ 
stenti nella routine DENTRY hanno 
designazioni differenti (prezzo massi¬ 
mo anziché numero di blocco, prez¬ 
zo minimo anziché numero di azioni 
e via dicendo). Queste designazioni 
di campo vengono predisposte nella 
subroutinc DENTRY nelle linee che 
seguono immediatamente il co¬ 
mando: 


IF X <> 3 TFIEN NTRY 


Ogni volta che X è uguale a tre il 
programma sostituisce gli opportuni 
nomi di file per introdurre i dati del 
prezzo di mercato. Tutti gli altri ele¬ 
menti della routine DENTRY resta¬ 
no immutati. Quando l'introduzione 
dei dati è stata completata, se è stato 
fatto clic sul pulsante OK il nuovo 
record viene aggiunto alla fine del fi¬ 
le e il record viene scritto sul file del 
nome del valore. 

Spesso si vuole introdurre più di 
un record di prezzo di mercato senza 
tornare alla barra di menù. Questo si 
fa assegnando i nomi Un altro e OK 
ai pulsanti di prompt e scegliendo se 
introdurre un altro record nello stes¬ 
so file di nome del valore. Se si fa 
clic sul pulsante Un altro la routine 
reimposta le introduzioni precedenti 
e va alla label AN per introdurre un 
altro record senza tornare alla barra 
di menù. 

Qualche volta è desiderabile modi¬ 
ficare record che sono stati introdotti 
nel file o semplicemente riesaminare 
il contenuto di un record. Per far que¬ 
sto selezionate l'opzione Modificare 
i file nella barra di menù e poi sce¬ 
gliete il tipo di file nel menù a disce- 
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sa. La modifica viene compiuta di 
fatto nelle routine EBUY, ESELL 
ed EMKT. Come abbiamo visto nel¬ 
le routine di recupero più sopra, il 
primo passo consiste nell'usare la su¬ 
broutine STKMNU per selezionare 
il nome del valore (assieme al suo 
numero di blocco) e il suo numero 
fisico di record nel file ad accesso ca¬ 
suale. Quando si modificano il file 
ACQUISTI o il file VENDITE la se¬ 
lezione del valore fa sì che il record 
sia visualizzato nella routine 
DENTRY, dove si possono apporta¬ 
re le modifiche al record esistente. 

Se il file del prezzo di mercato è 
selezionato per un dato valore la sele¬ 
zione del record si svolge in due pas¬ 
si. Primo, viene selezionato il nome 
del valore e lo si usa per leggere il fi¬ 
le di prezzo di mercato (nome del va¬ 
lore) per quel valore. Secondo, ogni 
introduzione nel file di prezzo di mer¬ 
cato per il valore scelto viene visua¬ 
lizzata con il nome del valore e la da¬ 
ta, il che identifica gli specifici dati 
di mercato da scrivere. Anche qui si 
utilizza la routine STKMNU per la 
selezione, tramite la visualizzazione 
di ciascun identificatore di record con 
un pulsante di selezione. Non avete 
bisogno di ricordare i nomi o le da¬ 
te dei valori in corso di selezione, in 
quanto essi vengono recuperati dai fi¬ 
le esistenti e automaticamente visua¬ 
lizzati per la selezione puntando e fa¬ 
cendo clic con il mouse. 

Principali prospetti 
e routine 

Il prospetto di Guadagno/perdita di 
mercato usa due file, il file ACQUI¬ 
STI e il file di prezzo di mercato (no¬ 
me del valore), per mostrare quali sa¬ 
rebbero i guadagni o le perdite sulla 
base dei più recenti prezzi di mercato 
introdotti per ciascun valore nel por¬ 
tafoglio. Il numero dei record pre¬ 
senti nel file ACQUISTI è mantenu¬ 
to nella variabile NR. Questa è uti¬ 
lizzata per leggere ogni record nel fi¬ 
le ACQUISTI mediante la routine 
OPFILE e i comandi GET #1. Quan¬ 
do il record ACQUISTI è stato recu¬ 
perato il nome del valore viene con¬ 
vertito in un nome di file con il co¬ 
mando FI$(3)= I$(I), e il nome vie¬ 
ne usato per recuperare l'ultimo re¬ 
cord nel file del prezzo di mercato 
(nome del valore), che riflette il più 
recente prezzo di mercato introdotto 
per il valore. 

Muniti dei dati d'acquisto e di 


prezzo di mercato siamo in grado di 
calcolare i dati di guadagno/perdita c 
di visualizzarli o stamparli. Per vi¬ 
sualizzare le intestazioni di prospet¬ 
to si usa la subroutine HDR. 

E veniamo alle routine di stampa 
a doppia mansione. Potete scegliere 
fra stampare un prospetto sulla stam¬ 
pante (SP=2) e stamparlo semplice- 
mente sullo schermo (SP=1). I pro¬ 
spetti sono stati organizzati in modo 
che i formati di visualizzazione sulla 
stampante e sullo schermo siano 
identici. Se per l’output si sceglie 
lo schermo il comando: 


OPEN "SCRN: M FOR OUTPUT 
AS #4 


avvia il prospetto allo schermo. Se 
viene scelta per l'output la stampan¬ 
te il comando: 


OPEN "LPTLDIRECT" FOR OU¬ 
TPUT AS #4 


avvia lo stesso prospetto alla stam¬ 
pante. E' un suggerimento utile da ri¬ 
cordare, perchè con un'attenta proget¬ 
tazione della configurazione del pro¬ 
spetto potete far funzionare la stessa 
formattazione dell'output sia per lo 
schermo sia per la stampante. 

Analogamente un'attenta progetta¬ 
zione del prospetto vi può aiutare a 
usare per i prospetti intestazioni co¬ 
muni (nomi, date e così via) dove c 
opportuno. Usando gli identificatori 
di filc/prospctto di HDR possiamo 
poi personalizzare le varie intestazio¬ 
ni di colonna a seconda che a X sia 
assegnato un valore di uno o di due 
(a indicare i differenti prospetti). 

Si noti che la data del prospetto 
viene recuperata dall'orologio inter¬ 
no del Macintosh con il comando 
PRINT #4, DATES. Si noti anche 
l'impiego del comando STRINGS 
(82,"-") alla fine della routine HDR. 
Si tratta di una comoda maniera di 
scrivere una fila di caratteri per evi¬ 
denziare una linea del prospetto. Es¬ 
sa è senz'altro supcriore al vecchio 
metodo del loop FOR-NEXT. Quan¬ 
do l'intestazione c stata scritta e le 
informazioni sul valore sono state re¬ 
cuperate siamo pronti a stampare la 
prima linea del prospetto. 

Investor utilizza tre^ routine di 
stampa comuni, LNA, LNB c 
TOTS, per stampare tutti i prospet¬ 
ti. Predisponendo variabili di stampa 
standard e poi impostando quelle va¬ 
riabili sui valori necessari per ogni 


diverso prospetto le stesse routine 
di stampa possono essere usate da 
differenti prospetti. Per esempio sia 
il prospetto Guadagno/perdita di mer¬ 
cato sia il prospetto Guadagno/perdi¬ 
ta sulle vendite usano come prime 
cinque voci di prospetto Nome, Nu¬ 
mero di blocco, Quantità, Data d'ac¬ 
quisto e Costo. Queste identiche vo¬ 
ci possono essere usate in entrambi 
i prospetti. Per esempio nel prospet¬ 
to Mercato la variabile B(4) è il prez¬ 
zo corrente, e nel prospetto Vendite 
la variabile B(4) è il prezzo di vendi¬ 
ta. In altre parole con un'accurata 
progettazione preliminare i formati 
di record possono aiutare a predispor¬ 
re formati di stampa comuni per ave¬ 
re una realizzazione più compatta dei 
prospetti. 

La routine LNA stampa le prime 
sette colonne di ciascun prospetto. 
Poi le routine MKTGL e SLSGL 
stampano campi personalizzati nel 
mezzo della linea di stampa. Infine i 
due prospetti usano la routine LNB 
per stampare il resto della linea con 
i dati comuni GUADAGNO/PERDI- 
TA, B/L e % G/P, come pure la li¬ 
nea di prospetto della commissione. 

La qualificazione per il plusvalore 
a breve o a lungo termine è calcolata 
nella subroutine SHLG. La data d'ac¬ 
quisto c la data correntc/di vendita so¬ 
no convertite in conteggi composti 
comparativi di giorni. La differenza 
fra le due date può essere poi con¬ 
frontata con 365 giorni per determi¬ 
nare se la transazione si qualifichi 
per guadagno/perdita a breve termine 
o a lungo termine. Se la transazione 
c ancora a breve termine il prospetto 
Guadagno/perdita di mercato mostra 
quanti giorni restino (GR) prima 
che l'investimento si trasferisca allo 
stato di lungo termine. 

Ogni valore per il quale si fa il 
prospetto mostra due rendimenti: il 
guadagno o la perdita lordi per la di¬ 
chiarazione dei redditi e il guadagno 
o la perdita "net net" dopo la detra¬ 
zione delle commissioni. Questo cal¬ 
colo viene fatto nella routine LNB 
ed è comune ai due prospetti. 

Per impedire lo scorrimento fuori 
schermo, per i prospetti lunghi, poi, 
la visualizzazione fa una pausa ogni 
18 linee (nove valori). Questo si ot¬ 
tiene con il comando: 


IF SP=1 AND (I MOD 9) <> 
THEN TNXT 


Il comando MOD va ciclicamente 
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da zero a otto a mano a mano che il 
valore di I aumenta. Quando il valo¬ 
re di I raggiunge 9, 18, 27, 36 e co¬ 
sì via il comando MOD torna a un 
valore di zero e la routine del pro¬ 
gramma chiama la selezione del pul¬ 
sante con la subroutine SLOT. A 
questo punto avete l’opzione di stam¬ 
pare la videata e continuare oppure 
continuare semplicemente a visualiz¬ 
zare il prospetto sullo schermo. Se 
scegliete di proseguire, lo schermo 
si pulisce e il prospetto continua a 
stamparsi sullo schermo. Se decidete 
di fermarvi potete interrompere l’e¬ 
lencazione e tornare alla barra di 
menù. 

L’ultima routine usata da entrambi 
i prospetti è la routine TOTS, che 
compendia gli importi di guada¬ 
gno/perdita a breve e a lungo termi¬ 
ne e un guadagno/perdita globale di 
portafoglio. L’ultima istruzione di 
TOTS aggiunge diverse interlinee al 
prospetto per fare spazio ai pulsanti 
di prompt che selezionano la succes¬ 
siva opzione del menù. 

Alla conclusione di ogni videata 
di resoconto viene usata una speciale 
routine PROMPT per darvi l'opzio¬ 
ne di stampare il contenuto dello 
schermo sulla stampante. Se volete 
una copia stampata la routine è av¬ 
viata al comando LCOPY, che river¬ 
sa la videata sulla stampante. Natu¬ 
ralmente potete stampare la videata 
in qualsiasi momento premendo si¬ 
multaneamente i comandi <Shift> 
<Command>4. 

Il prospetto di Guadagno/perdita 
vendite usa praticamente tutte le rou¬ 
tine di stampa usate dal prospetto di 
Mercato. La differenza principale è 
che per sviluppare questo prospetto 
vengono usati i file ACQUISTI e 
VENDITE. In questo caso il file 
VENDITE è il file di controllo ed è 
selezionato con ridentificatore di file 
X=2. A mano a mano che ciascun re¬ 
cord viene letto nel file VENDITE il 
nome e il numero del lotto del valo¬ 
re venduto sono confrontati con i no¬ 
mi e i numeri del lotto nella matrice 
dei record di ACQUISTI mantenuti 
in memoria. 

Quando si verifica una corrispon¬ 
denza la variabile HIT è assegnata al 
numero di record di ACQUISTI. Il 
corrispondente record di ACQUISTI 
viene recuperato dal dischetto e la li¬ 
nea di prospetto viene stampata me¬ 
diante le routine descritte per il pro¬ 
spetto di Mercato. Se non si verifica 
alcuna corrispondenza viene visualiz¬ 


zato il messaggio "Nessun record di 
ACQUISTI per nome del valore” e 
il prospetto prosegue. 

Il prospetto Grafico del valore è 
uno dei più potenti strumenti di ge¬ 
stione degli investimenti. Nella bar¬ 
ra di menù selezionate nel menù Pro¬ 
spetti l’opzione Grafico valore. 

Il primo passo nella routine 
GRPH è la selezione, mediante la 
routine STKMNU esaminata più so¬ 
pra, del nome del valore per il quale 
dev’essere fatto il grafico. Per questo 
prospetto il numero di lotto del valo¬ 
re viene ignorato (nella selezione del 
nome) in quanto i prezzi di mercato 
del titolo rimangono gli stessi, quali 
che siano gli acquisti del lotto. 

Viene fatto, mediante la routine 
CHKEC, un controllo per vedere se 
ci siano dati di mercato per tracciare 
il grafico del valore scelto. Se nel fi¬ 
le non ci sono dati di prezzo lo 
schermo visualizza: 


Nessun dato in... 


e un pulsante che vi permette di tor¬ 
nare alla barra di menù. 

Il passo successivo nella prepara¬ 
zione del prospetto consiste nella let¬ 
tura dell’intero file dei prezzi di mer¬ 
cato del valore selezionato, per deter¬ 
minare i prezzi massimo/minimo e 
il volume delle vendite per il perio¬ 
do coperto nei record del file. Questi 
valori sono conservati rispettivamen¬ 
te nelle variabili HI, LO, HV e LV. 
I valori sono poi visualizzati sullo 
schermo assieme al più recente prez¬ 
zo e alla data del più recente prez¬ 
zo/volume immagazzinato nel file. 

Le differenze fra prezzi massi¬ 
mi/prezzi minimi e volumi all’ini¬ 
zio e alla fine del periodo vengono 
utilizzate per calcolare gli intervalli 
che sono issati per allestire i diagram¬ 
mi. L'istruzione: 


IH = INT(200/ST) 


calcola l’intervallo dei prezzi, e l'i¬ 
struzione: • 


IV = INT(HV-LV/50) 


calcola l'intervallo dei volumi. 

Per quanto concerne il disegno del 
grafico, sullo schermo ci sono 200 
pixel (posizioni di punto) verticali 
assegnati al grafico dei prezzi e 50 
pixel assegnati al grafico dei volu¬ 
mi. Gli assi del grafico vengono di¬ 
segnati nella routine GRPH. I valori 


assegnati ai punti sugli assi sono vi¬ 
sualizzati mediante la subroutine 
DRWN. Questa subroutine parte dal 
prezzo (o volume) più alto e poi vi¬ 
sualizza intervalli di dieci punti per 
il prezzo e un valore massimo/me¬ 
dio/minimo per il volume. La sele¬ 
zione del modo testo permette al co¬ 
mando MOVETO di posizionare i 
valori da stampare sullo schermo 
senza scrivere sopra il display gra¬ 
fico. 

Il comando PS ET (PP,F) visualiz¬ 
za i punti della griglia (dot) per age¬ 
volare la lettura del grafico. Se pro¬ 
vate a usare diverse estensioni di 
prezzi scoprirete che il grafico viene 
automaticamente messo in scala in 
modo che abbracci i prezzi e si 
espande per mostrare una maggior 
sensibilità nei confronti dei titoli 
con piccole fluttuazioni di prezzo. 

Un'altra sezione della routine 
GRPH disegna le linee d’indicazio¬ 
ne. Questo codice crea le graduazioni 
per i prezzi messi in scala e provve¬ 
de una griglia di rilevamento di 52 
periodi per i prezzi e i volumi. 

Per disegnare i valori dei prezzi e 
delle vendite dei titoli ogni record di 
prezzo di mercato viene riletto in se¬ 
quenza e tracciato. Ogni record viene 
tracciato quando è letto, allo scopo 
di risparmiare memoria (perciò non 
tutti i record sono immagazzinati in 
memoria nello stesso tempo). I prez¬ 
zi massimo, minimo e di chiusura 
sono calcolati per la posizione sullo 
schermo rispettivamente nelle varia¬ 
bili XA, XB e XC, e poi vengono 
tracciati la linea e il puntino del prez¬ 
zo di chiusura per il record appena 
letto. In modo analogo viene calcola¬ 
ta, e messa nella variabile XV, l’al¬ 
tezza della linea del volume. Questa 
variabile è usata per tracciare il vo¬ 
lume. 

Poi viene fatto il test del titolo 
per calcolare una media mobile di 13 
settimane. Il tracciamento di questa 
media comincia solo quando viene 
letto nel file il tredicesimo valore 
del titolo. Durante la lettura dei pri¬ 
mi 12 record i prezzi sono immagaz¬ 
zinati nella matrice MA(CC). A co¬ 
minciare dal tredicesimo record viene 
calcolata una media scorrevole dei 
tredici prezzi più recenti, che viene 
tracciata come riquadro di quattro pi¬ 
xel (punto) mediante i comandi 
PSET. 

. Nella routine successiva viene cal¬ 
colata e tracciata la media mobile di 
52 settimane. La media mobile è cu- 
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C’è gente che non sa.resistere alla ten¬ 
tazione di ficcare il naso nei program¬ 
mi altrui. E magari di utilizzarli. È un 
genere di furto in continuo aumento, 
tanto da essere diventato un pro¬ 
blema scottante per tutte le aziende. 
Oggi però contro i pirati del software 
c’è una difesa efficace. Si chiama Pro- 
!ok ed è un sistema di protezione hard¬ 
ware e software che si adatta a tutte 
le esigenze ed è funzionalmente com¬ 
patibile con una vasta gamma dei più 
importanti personal computers. Che 


cos’è? È una impronta laser unica ed 
irripetibile come un’impronta digitale, 
inserita direttamente sul dischetto. 

Il programma una volta nel dischetto, 
cerca il codice speciale e solo se lo tro¬ 
va funziona. 

L’impronta laser assolutamente incan¬ 
cellabile, permanente e personalizzata 
per ogni dischetto, è tale da scoraggia¬ 
re qualsiasi tentativo di 
riproduzione o accesso 
illegale. 

La linea Prolok com¬ 


prende diversi sistemi studiati per ri¬ 
spondere alle diverse esigenze di sicu¬ 
rezza, tra cui uno particolarmente 
interessante per la duplicazione protet¬ 
ta. 

Così chi si affida alla protezione di Pro¬ 
lok può dormire sonni tranquilli. E ladri 
dal naso lungo resteranno, come si me¬ 
ritano, con un palmo di naso. 




/ 

c 


MEE 


s.p.a. -20144 MHano-Via Boni, 29 

t. 02/4988541-te/ex324426MEE/talia 


Parliamone insieme. 






mulativa lungo i primi 52 periodi, 
vale a dire i primi due prezzi vengo¬ 
no divisi per due, i primi dodici prez¬ 
zi vengono divisi per dodici e così 
via. Quando è stato raggiunto il li¬ 
vello di 52 record, Investor usa sol¬ 
tanto i 52 record più recenti del file 
allo scopo di mantenere una media 
scorrevole di 52 settimane (a mano 
a mano che ogni nuovo prezzo/volu¬ 
me del titolo viene introdotto nel si¬ 
stema). 

Infine vengono visualizzati i valo¬ 
ri effettivi del volume medio e le me¬ 
die di 13 settimane e di 52 settimane 
tramite i comandi LOCATE alla fi¬ 
ne della routine GRPH. 

Lo scorrimento e 
l'esplorazione dei file 

Quando si scorrono i file, il file 
ACQUISTI o VENDITE è designato 
dall'identificatore di file X nella rou¬ 
tine SBUY o in quella SSELL. 

Se viene selezionata l'opzione del 
file del prezzo di mercato viene ese¬ 
guita la subroutine STKMNU, al fi¬ 
ne di selezionare il nome del titolo 
per il file di prezzo da esplorare. Poi 
viene eseguita la subroutine 
CHKREC per determinare il numero 
dei record esistenti nel file e per met¬ 
tere questo numero nella variabile 
XR. Nella selezione di un nome di 
valore per il prezzo di mercato Inve¬ 
stor ignora ilnumero del lotto del ti¬ 
tolo selezionato, in quanto i prezzi 
di mercato sono indipendenti dai 
prezzi d'acquisto per i blocchi del 
portafoglio. In altre parole, se avete 
diversi blocchi di acquisto dello stes¬ 
so titolo potete selezionare uno qua¬ 
lunque dei blocchi, e i prezzi di mer¬ 
cato presenteranno in stampa/visua¬ 
lizzazione gli stessi/comuni dati di 
prezzo di mercato. 

Per contenere le intestazioni di co¬ 
lonna è usata la variabile a matrice 
H$(), e per scrivere le intestazioni di 
colonna è usata la routine HDR2. 
Poi il file selezionato viene aperto 
con la subroutine OPFILE, e la rou¬ 
tine LSC comincia a leggere cia¬ 
scun record dal file selezionato con 
il comando GET. Di mano in mano 
che ogni record è letto viene visualiz¬ 
zato tramite la subroutine DSPL1. 
La struttura e la logica di control¬ 
lo/formattazione del file e della stam¬ 
pante sono molto simili ai comandi 
di intestazione e linea di stampa usa¬ 
ti per i principali prospetti. 

Quando è stato visualizzato un lot¬ 


to di 20 record il programma fa una 
pausa, mediante il comando I MOD 
20. Potete fare clic con il mouse per 
proseguire, per stampare la videata o 
per tornare alla barra di menù. Se 
volete proseguire lo schermo si puli¬ 
sce e visualizza i 20 record seguenti. 

L'eliminazione 
dei record superflui 

Quando è stato scorso l'intero file 
(l'indice, I, è uguale al totale dei re¬ 
cord, XR) il programma torna alla 
barra di menù (per la stampa dei pro¬ 
spetti) o all’opzione di stampa sullo 
schermo (per i display). Praticamen¬ 
te tutte le subroutinc utilizzate dalle 
routine di esplorazione sono state 
usate in precedenti parti del program¬ 
ma e sono spiegate più sopra.Ognu- 
na delle tre routine PURGE fa ricor¬ 
so a una logica diversa per identifica¬ 
re i record da eliminare. Quando vie¬ 
ne selezionato il file ACQUISTI 
ogni record d’acquisto che contiene 
più di zero azioni viene scritto in un 
file TEMP. Se un record contiene ze¬ 
ro azioni viene saltato e non viene 
scritto nel file TEMP. Quando è sta¬ 
to letto l'ultimo record il file TEMP 
contiene solo record con più di zero 
azioni. A questo punto il vecchio fi¬ 
le ACQUISTI viene cancellato dal di¬ 
schetto con KILL e il file TEMP 
viene rinominato come nuovo file 
ACQUISTI con il comando: 


NAME "TEMP" AS FI$(XX) 


Una logica analoga viene usata per 
togliere record dal file VENDITE. In 
questo caso la data mirata è converti¬ 
ta in numero composto e assegnata 
alla variabile TD1. Poi, a mano a 
mano che ciascun record viene letto, 
la data contenuta nel record è conver¬ 
tita in un numero composto compa¬ 
rabile e confrontata con la data mira¬ 
ta. Se la data del record è maggiore 
della data mirata il record viene scrit¬ 
to in un file TEMP. Alla conclusio¬ 
ne della ripulitura il file VENDITE 
è cancellato e il file TEMP viene ri¬ 
nominato come nuovo file VENDI¬ 
TE. Così tutti i record di vendite 
con data anteriore alla data mirata so¬ 
no eliminati. 

L'eliminazione di record dal file 
del prezzo di mercato usa la subrouti¬ 
ne CHKREC per recuperare il nume¬ 
ro totale dei record contenuti in un fi¬ 
le di valore selezionato. Il file viene 
letto partendo da un punto che è a 


51 record dalla fine del file. Il record 
iniziale, SR, è calcolato solo per i fi¬ 
le selezionati che contengono più di 
51 record. Poi la routine procede con 
la stessa logica delle eliminazioni di 
record dai file ACQUISTI e VENDI¬ 
TE, vale a dire viene costruito un fi¬ 
le TEMP perchè contenga i record 
superstiti, il vecchio file viene can¬ 
cellato con KILL e il file TEMP vie¬ 
ne rinominato con il nome del file 
che si sta aggiornando. 

Per risparmiare memoria i record e 
i prospetti stampati sono stati accu¬ 
ratamente progettati in modo da otte¬ 
nere la massima sovrapposizione di 
codice. 

Qualche consiglio 
di programmazione 

Per esempio si è potuto utilizzare 
un insieme comune di routine di In¬ 
put/Output per tutta l’attività dei fi¬ 
le, dato che dimensioni dei record e 
numero dei campi erano identici per 
ciascun file. In questo caso vale la 
pena di sciupare un campo in un re¬ 
cord del dischetto per usare un unico 
insieme di subroutine di input e ou¬ 
tput. 

I programmatori in Applesoft po¬ 
tranno approfittare di qualcuna delle 
scorciatoie e di qualcuno dei coman¬ 
di composti disponibili nel Micro¬ 
soft Basic. 

Per esempio LOF(X)/lunghczza 
del record trova il numero dei record 
presenti in un file ad accesso casuale 
e sostituisce la tecnica dell'Apple- 
soft che usa un puntatore di record 
nel record R0 di ogni file ad accesso 
casuale. STRING$(n,"c") è un ma¬ 
gnifico rimpiazzo dei loop FOR- 
NEXT usati per stampare stringhe di 
caratteri (dove n è il numero delle ri¬ 
petizioni del carattere e c il carattere 
stesso). PRINT USING "#####" è 
un'autentica cuccagna per la formatta¬ 
zione dei prospetti. Può essere com¬ 
binato con TAB(XX) e altre opzio¬ 
ni di stampa in comandi PRINT sin¬ 
goli a parti multiple. 

Quando volete scrivere caratteri di 
testo nelle videate grafiche senza can¬ 
cellare la grafica sotto i caratteri usa¬ 
te il comando CALL TEXT-MODE 
(1) per stampare nitidamente il te¬ 
sto. Questa sintassi è utilizzata nella 
routine DRWN per stampare i dati 
dei prezzi senza guastare l'asse Y del 
grafico. 

Un’osservazione perCLEAR: Inve¬ 
stor usa quasi tutta la memoria di- 
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sponibile in un Mac 128K. I valori 
di default delle aree di memoria di 
heap, di stàck e dei dati sono all'in- 
circa, rispettivamente, 13,6K, 6,5K 
e 3,8K. 

Se si facesse girare Investor senza 
spostare i confini della memoria que¬ 
ste impostazioni darebbero un errore 
OUT OF MEMORY. Il comando 
CLEAR,2600,1024 apre all’area dati 
del Basic memoria aggiuntiva, e per¬ 
mette al programma di girare in 
128K di memoria (quando ampliate 
l'area dati dovete ridurre le dimensio¬ 
ni dello stack). 

Va sottolineato poi che gli utenti 
del Mac 512K possono omettere il 
comando CLEAR all’inizio del pro¬ 
gramma. 

Possibili interventi 

Esaminando il programma notere¬ 
te che potete predisporre routine co¬ 
muni di pulsanti e poi usare variabi¬ 
li per riempire gli identificatori di 
pulsante. Questo è particolarmente 
evidente nella subroutine STKMNU 
che permette di selezionare un nome 
di valore facendo clic su un pul¬ 
sante. 

Dato che Investor è strutturato per 
funzionare con un unico record alla 
volta (in memoria) la sola matrice 
che è mantenuta in memoria è un in¬ 
dice dei nomi e dei numeri. 

Ciò significa che il programma 
può contenere 75 valori in un Mac 
128K e un numero praticamente illi¬ 
mitato di valori in un Mac 512K. 
Nei Mac 512K la limitazione princi¬ 
pale è costituita dalla capacità del di¬ 
schetto. 

Per quanto Investor si presti a mo¬ 
difiche e miglioramenti, comunque, 
dovete andare molto cauti per quanto 
riguarda eventuali aggiunte al codice 
in un Macintosh 128K. Al tempo 
stesso, però, si può fare molto con i 
file creati dal programma. 

Per esempio i file potrebbero esse¬ 
re usati per confrontare il portafo¬ 
glio con qualcuno dei rapporti e in¬ 
dici di mercato più diffusi, come, 
per esempio, il rapporto rialzo/ribas¬ 
so, la statistica di supcrcomprato/su- 
pervenduto, il rapporto massimo/mi¬ 
nimo e i grafici lineari di trend mas¬ 
simi/minimi. 

In breve, le informazioni basilari 
sugli investimenti captate da Inve¬ 
stor sono un'area ricca di possibilità 
di ampliamento e di programmi com¬ 
plementari. 


Corso Italia 149 - 34170 GORIZIA - Tel. 0481 /30909 


_ MIRROR TECHNOLOGIE S_ 

MagNet 20 Disco rigido da 20 MByte interno per Mac. Fornito con 
MacServe software della Infosphere che permette: 

MultiUser (sino a 16 MAC in rete AppleTalk) 

Partizione in volumi (sino a 16 volumi logici) 

Disk Cache 

Protezione con Password a livello di volume 
Spool di stampa (sino a 32 lavori) 

Print Server/Disk Server su Apple Talk 
Backup completo o incrementale e Restore 
Sistema di gestione gerarchico APPLE HFS 

DISPONIBILE ANCHE NELLA VERSIONE ESTERNA 


MacMemory Ine. & The MAX Plus | 

Espansione a 2 Megabyte per il Macintosh Plus. Facilmente installabile e ri- 
muovibile. Grazie al software con cui viene fornita, MaxRam e MaxPrint (di¬ 
sponibili anche separatamente), che permettono, rispettivamente, la creazione di 
un dischetto virtuale ed il caricamento automatico in esso di tutti i program¬ 
mi che volete, e lo spool di stampa su Image Writer, porterà il vostro Mac a 
delle velocità incredibili. Fornito con Max Chili, il ventilatore per Mac (disponibi¬ 
le separatamente). 


THUNDERSCAN V. 3.2 


Ultimissima versione di ThunderScan. Compatibile con tutte le stampanti Apple. 
Con un adattatore e un cavo speciale è ora possibile usarla anche con Macintosh 
Plus . Disponibile anche il solo adattatore. 


NUOVO SOFT PER IL VOSTRO MAC 


MAC PALETTE 

Con questo programma potrete scrivere a colori con Image Writer II. Potre¬ 
te stampare a colori i disegni realizzati con Mac Draw e Mac Draft. Potrete an¬ 
che stampare a colori con programmi di Word Processing e con quasi tutti i 
programmi per il Mac. 

LASERWORKS 

Per definire un qualunque set di caratteri per la stampa con la Laser. 

Possibilità di definire anche disegni, marchi, ecc. 

VICOM COMMUNICATIONS SOFTWARE 

Il "Vero programma per comunicazioni" è ora disponibile in Italia. Per¬ 
mette il collegamento con tutte le banche dati: anche Videotel. Multita¬ 
sking: contemporanemante potete trasmettere un file mentre ne stampate un'al¬ 
tro e ne state creando un terzo (è anche un word processor). Emulazione VT 
100. Facile da usare. 

MAC DRAFT 

Uno dei più famosi programmi di disegno per il Mac, ora disponibile nella versio¬ 
ne per il MacPIus, migliorato e corretto. 

MAC PLOT 

Con Mac Plot nella versione normale potrete pilotare quasi tutti i Plotter dispo¬ 
nibili sino al formato A3. MacPIot Professional permette di pilotare an¬ 
che plotter sino al formato A0. 

I prodotti distribuiti da Elcom sono disponibili presso 
gli Apple Center o per corrispondenza 
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Investor per Apple II 

Dal gennaio 1984, data della sua 
pubblicazione su Applicando , il pro¬ 
gramma Investor per Apple II, di ac¬ 
qua sotto i ponti della borsa ne è pas¬ 
sata; le recenti fluttuazioni hanno 
suggerito a Enzo Leva di modificar¬ 
ne la grafica per renderla più confor¬ 
me alla realtà italiana. E' ora a dispo¬ 
sizione dei lettori questa versione ag¬ 
giornata (Disk Service AP5/N08), 
che sostituisce la precedente. 

Si è preferito, per semplicità, scin¬ 
dere il programma in due listati, In¬ 
vestor e Grafici, ed è venuta a cadere 
l'utilità del programma Carica Inve¬ 
stor. Il nuovo Hello, dopo la presen¬ 
tazione del Logo, lancia direttamente 
il programma Investor. Nel nuovo 
Investor non ci sono variazioni per 
quanto riguarda le parti Prospetti e 
Gestione dati; ecco invece le nuove 
caratteristiche dell'Analisi grafica: 

• Nessuna limitazione tra punte mas¬ 
sime e minime 

• Nuovo grafico di andamento di 
chiusura 

• Andamento massimo/minimo 

• Media mobile 52 periodi 

• Media mobile 13 periodi (non plot- 
tata) 

• Indicatore di forza prezzo/mercato 
(PRF) 

• Rapporto prezzo attuale/prezzo me¬ 
dio (in %) 

• Rapporto prezzo attuale/prezzo 
max (in %) 

• Periodi considerati 

• Prezzo max/medio/min/attuale 

• Volume max/medio/min 

• Tabulato dei dati considerati 

• (andamento delle quotazioni) 

L’uso del programma Investor è 

pressoché invariato: dal menù princi¬ 
pale si può quindi passare alle se¬ 


guenti operazioni: aggiungere un in¬ 
vestimento, ultimi prezzi di merca¬ 
to, modificare un titolo, portafo¬ 
glio pendere un titolo, depennare un 
titolo, grafici, resoconti vari, fine. 

Scegliendo l’opzione Grafici viene 
lanciato il programma omonimo, 
dal quale si può ritornare al menù 
principale premendo RETURN; si 
può inoltre visionare l'elenco dei ti¬ 
toli registrati col comando 
CATALOG; si può infine scegliere 
un titolo da tradurre in grafico: in tal 
caso, viene innanzitutto controllata 
resistenza del titolo richiesto, per 
evitare l'uscita forzata del program¬ 
ma, che provvede poi a leggere i dati 
relativi al titolo richiesto (ovvero 
gli ultimi 52 periodi) e a stabilire i 
valori massimo e minimo riscontra¬ 
ti nel periodi in esame. Questi valo¬ 
ri vengono successivamente utilizza¬ 
ti per suddividere lo schermo in parti 
uguali e consentire il plottaggio di 
tutti i valori considerati, come negli 
esempi riportati qui sopra. 

Più precisamente, identificati i va¬ 
lori massimo e minimo, viene ricer¬ 
cato un divisore di entrambi (multi¬ 
plo di 10) e, posto il valore massi¬ 
mo in alto nello schermo e il mini¬ 
mo in basso, vengono tracciate le li¬ 
nee divisorie intermedie. Vengono 
inoltre disegnati la linea del PRF e 
le linee verticali identificative dei 52 
periodi e le scritte PRF e Applican¬ 
do Investor. Su questa "lavagna" ven¬ 
gono successivamente disegnati: 

- l’andamento di chiusura, con una li¬ 
nea spezzata nera che congiunge i 
singoli valori; 

- l'andamento della media mobile di 
chiusura con un trattino rosso in cor¬ 
rispondenza di ogni dato registrato; 

- se esistono, i valori massimo e mi¬ 
nimo, congiunti da una linea verde. 


Nella finestra al di sotto del grafi¬ 
co vengono poi indicati, in percen¬ 
tuale, i discostamenti del prezzo at¬ 
tuale da quello medio e da quello 
massimo raggiunto nel tempo in esa¬ 
me; segue una pausa, quindi: 

- nome del titolo (16 caratteri) 

- periodi considerati 

- prezzo massimo/minimo/attuale 

- volume massimo/minimo 

- media del prezzo e media del 
volume 

A questo punto, un’altra pausa che 
consente di avviare l’eventuale hard- 
copy su stampante e, infine, il tabu¬ 
lato dell’andamento delle quotazioni, 
che riporta data, massimo, minimo, 
chiusura, volume e variazione per¬ 
centuale rispetto al dato precedente. 
Questo tabulato è previsto solo su 
stampante; viene pertanto omesso se 
si è in opzione video, tornando con 
la pressione di un tasto alla richiesta 
del nome di un altro titolo per il qua¬ 
le si desidera il grafico. 

Infine, un'avvertenza importante: 
il programma Grafici senza i REM 
va a finire esattamente sotto la pri¬ 
ma pagina video. Non bisogna 
quindi modificare il listato, pena la 
comparsa di fastidiose linee di inter¬ 
ferenza (prove di significato) che si 
sovrappongono al grafico. Per lo 
stesso motivo, la media mobile su 
13 periodi è soltanto calcolata (e con¬ 
siderata), ma non plottata: poco ma¬ 
le, in quanto ne guadagnano in chia¬ 
rezza i grafici. 


Questo programma è disponibile 
su dischetto, sia per Mac sia per 
Apple II. L’elenco, i prezzi 
e le modalità d’ordine di questi 
e degli altri dischetti disponibili 
sono riportati nella rubrica 
Disk Service. 

\ _ ^ 
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LE PAGINE SOFTWARE E HARDWARE 1986-87 





3 PROGRAMMI 
HARDWARE 
E ACCESSORI 


Stai per acquistare un 
personal computer Apple? 

Vorrai sapere che cosa puoi far¬ 
ci. Questo volume è un aiuto indi¬ 
spensabile, una guida ragionata 
e completa di tutti i programmi, 
l’hardware e gli accessori dispo¬ 
nibili in Italia. Prima di fare il tuo 
acquisto non puoi non consultar¬ 
lo, perché solo se avrai a disposi¬ 
zione il programma, o i program¬ 
mi, e le periferiche che ti interes¬ 
sano, la tua scelta non ti lascerà 
deluso. 


Hai appena acquistato un 
personal computer Apple? 

Senza questa raccolta di pro¬ 
grammi e le numerosissime se¬ 
gnalazioni di periferiche hardwa¬ 
re e di accessori non potrai mai 
sapere quali e quanti utilizzi po¬ 
trai farne. 


OW* A 2,ll0C. 

e Successo" 

Possiedi già da tempo un 
personal computer Apple? 

Allora non c’è bisogno di dirti 
quanto può essere prezioso que¬ 
sto libro: sai già che il tuo compu¬ 
ter, senza programmi e senza un 
hardware adeguato, è come 
un’auto senza benzina e senza 
le ruote. E poiché non c’è limite 
alla fantasia e all’inventiva, con¬ 
sultando questa guida scoprirai 
utilizzi impensati per il tuo perso¬ 
nal. Utilizzi che ti permetteranno 
nel lavoro, nel tempo libero, nel 
gioco o nello studio, di essere 
sempre il più aggiornato, il più 
organizzato, il più soddisfatto... 

Tì interessano i programmi 
e l’hardware per Macintosh? 

In questa nuovissima edizione 
delle Pagine del Software per 
Apple trovi elencati, con una ap¬ 
profondita descrizione, tutti i pro¬ 
grammi e le periferiche hardware 
disponibili in Italia. 


Desidero ricevere, senza aggravio di spese postali, Le Pagine Software e Hardware, con la seguente formula 
(segnare la casella di proprio interesse): 


Nuova 
edizione 
aggiornata 
e ampliata 

- 


Le Pagine Software e 
Hardware sono un supplemento 
di Applicando, il mensile per i 
personal computer Apple. 
Acquistarle singolarmente costa 
20.000 lire. Per chi si abbona ad 
Applicando sono in regalo. 


□ 20.000 lire per ricevere l’edizione 1986-87 di 

Le Pagine Software e Hardware per Apple. 

□ 60.000 lire per ricevere 10 numeri di Applicando e in regalo l'edizione 1986-87 di 

Le Pagine Software e Hardware per Apple. 

COGNOME E NOME ". 

VIA. N. 


Ritagliare, compilare • 
spedire a: Edltronlca Srl, 
Corso Monforte 39, 

20122 Milano. 


CAP. CITTÀ. PR0V. 

□ Allego assegno non trasferibile di L.intestato a Editronica Srl. 

□ Allego ricevuta di versamento di L.sul CC postale N. 19740208 intestato a Editronica Srl. 

Corso Monforte 39, 20122 Milano 

□ Pago fin d'ora con la mia carta di credito Bankamericard N.scadenza. 

Data Firma. 
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Nasce con questo numero la rubrica AppliExcel, che of¬ 
frirà consigli e suggerirà astuzie per convivere piacevol¬ 
mente con un Macintosh e il programma Excel della 
Microsoft, il massimo in assoluto, fino a oggi, in fatto 
di fogli elettronici. Sono i benvenuti: suggerimenti, criti¬ 
che, soluzioni alternative e quesiti. 

Elenco di mesi: ecco l'algoritmo 

Tabelle riassuntive, cartogrammi, analisi finanziarie e 
non, sono sempre accompagnate da un elenco di mesi. Il 
formato è il più vario: va da 01 a Gennaio; ecco la solu¬ 
zione per chi spesso affronta tali problemi. 

La funzione = DATE( YEAR(), MONTH(), DAY()) 
fornisce il numero relativo alla data espressa rispettiva¬ 
mente dalle tre variabili; questo però non ò sufficiente 
per agire in pigrizia; occorre infatti introdurre all'interno 
della funzione un algoritmo che trasformi la posizione re¬ 
lativa alla cella in cui si vuole che appaia il mese nella 
data del calendario Giuliano presente alfinterno dell'E- 
XCEL (anni dal 1904, al 2040). L'algoritmo sarà realiz¬ 
zato con la funzione ROW() nel caso occorra un elenco 
verticale e COLUMN() quando occorra in senso orizzon¬ 
tale. L’algoritmo andrà "aggiustato" in modo tale che il 
risultato rappresenti il mese in cifre. Un esempio? In ca¬ 
sella (A5) per ottenere il valore (1), che sta per Gennaio, 
occorre formulare nel modo seguente: 

=ROW()-4 (=1) per il verticale 

=COLUMN() (=1) per l'orizzontale 

Sostituendo l'argomento MONTH() con l'algoritmo so¬ 
pra approntato, la formula finale sarà la seguente: 
=DATE(1986,ROW0-4,l) per il verticale 

=DATE(1986,COLUMN(),l) per l’orizzontale 

Il risultato così ottenuto potrà essere formattato (Menu 
Format opzione Number) in più modi secondo la propria 
necessità e la visualizzazione sarà: 

FORMATO VISUALIZZAZIONE 
m 1 (i mesi con due cifre sono rappresen¬ 

tati come valore 1) 

mm 01 

mmm Jan 

mmmm January (Gennaio per la versione Ita¬ 

liana) 

La formula andrà duplicata nelle celle adiacenti con i 
comandi Fili Down e Fili Right al fine di completare l'e¬ 
lenco. 

L'algoritmo sopra illustrato risolve esclusivamente si¬ 
tuazioni adiacenti; nel caso ad esempio che i mesi, per 
motivi estetici o funzionali, debbano essere separati da u- 
na quantità fissa di righe o colonne, falgoritmo andrà 
modificato in modo tale che traduca la posizione della 
cella, in base al passo prefissato. Questo algoritmo: 
=(CÓLUMN()*passo)-(passo-l)produce, in caselle adia¬ 


centi, una sequenza di numeri incrementati dal passo. Il 
nome passo va inteso come differenza tra due inizi o due 
fini di un gruppo omogeneo di dati; la funzione CO- 
LUMN() naturalmente potrà essere scambiata con la fun¬ 
zione ROW(). 


Ad esempio per passo=3 si avranno nelle colonne 


1 2 3 

4 

5 

6 

7 8 9 

10 

11 

12 

i seguenti risultati: 

1 4 7 

10 

13 

16 

19 22 25 

28 

31 

34 


La soluzione del problema però, sta nel ricavare il va¬ 
lore prodotto dalla funzione COLUMN() in partenza dal 
risultato finale dell’algoritmo; quindi sarà sufficiente un 
algoritmo passo singolo "rovesciato" per ottenere la so¬ 
luzione cercata: 

=(COLUMN()+passo- l)/passo 
Una nota per i conoscitori d’algebra: la funzione CO- 
LUMNQ non rappresenta la stessa variabile nei due casi, 
perche il posizionamento della formula avviene non in 
celle adiacenti, ma bensì in celle distanziate tra loro dal 
passo. Per esempio, volendo una distribuzione dei mesi 
ogni tre colonne (passo=4-l=3), la formula andrà così 
modificata: 

=DATE( 1986,(COLUMN ()+2)/3,1 ) 

La formula è corretta se scritta nella colonna 1; in tut¬ 
te le altre situazioni la stessa andrà aggiustata in modo 
tale che la funzione COLUMN() produca il valore (1) si¬ 
nonimo di gennaio. Va ricordato che la relazione che tie¬ 
ne unito l'algoritmo è legata al passo; pertanto trovando¬ 
si nella riga 14 e volendo ottenere il valore 2, sinonimo 
di febbraio, la relazione non sarà ROW()-12, ma bensì 
ROW()-10 (il perché va ricercato nella tabcllina dell'algo¬ 
ritmo a passo singolo). 

Selezione per tutti 

Selezionare è un'azione familiare a tutti gli utenti Ma¬ 
cintosh; nel caso di Excel i progettisti hanno fornito del¬ 
le ulteriori facilitazioni e precisamente: 

• divisione dello schermo in quattro finestre; 

• possibilità di estendere la selezione esistente, foss'an- 
che una sola cella, alle celle adiacenti tenendo premuto il 
tasto schift mentre si fa click; 

• possibilità di selezionare celle non adiacenti tenendo 
premuto il tasto comando mentre si fa click. 

Per esempio, dovendo duplicare un record posizionato 
sulla riga 5 nelle 100 righe sottostanti, che presenti le 
formule distribuite nelle celle A5:C5, F12, H16, si pro¬ 
cederà nel seguente modo: 

a) si dividerà lo schermo in modo che nella finestra sot¬ 
tostante appaia la riga n.104; 

b) dopo aver selezionato la cella A5, tenendo premuto il 
tasto schift si farà click sulla cella C104; 

c) tenendo premuto il tasto comando, si selezionerà la 
cella F12, si rilasccrà il tasto comando e si premerà il ta¬ 
sto schift per poi selezionare la cella F104; 

d) si ripeteranno le operazioni di cui al punto c) riferendo¬ 
si alla colonna H; 

e) si sceglierà dal menu Edit l’opzione Fili Down ovvero 
si premeranno contemporaneamente il tasto comando e 
il tasto D. 

Esistono altri modi per selezionare in velocità: li ve¬ 
dremo in un prossimo futuro. 
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HP: High level 

Pnnter. 


l e stampe più importanti 
che escono dal tuo Personal 
devono farsi vedere molto 
e sentire poco. 



.— oreS enti atto ' 





Hewlett-Packard, all’avanguardia 
nell’elettronica mondiale e leader nel settore 
delle stampanti per Personal Computer, ha 
creato dei veri e propri sistemi di scrittura 
che rivoluzionano le tecnologie fin qui 
adottate. Come la stampante professionale 
LaserJet, che introduce per la prima volta 
tutti i vantaggi della stampa laser: caratteri e 
grafica di alta qualità, fun¬ 
zionamento silenzioso, 
affidabilità. LaserJet sta 
su una scrivania; è in 
grado di stampare 
otto pagine al 
minuto, con più 
tipi di caratteri 
nella medesima 
pagina. E come la 
stampante ThinkJet che, grazie 
alla sua tecnologia a getto di inchiostro, 
stampa velocemente e silenziosamente let¬ 
tere e grafici. Potrai usare le stampanti HP 
col tuo Personal, qualunque esso sia. 

Infatti sono compatibili con tutti i Personal 
più diffusi. Se vuoi saperne di più, vai da un 
Rivenditore Autorizzato, lo 
trovi sulle Pagine Gialle alla 
voce Personal Computer, 
oppure ti basterà compilare 
in ogni sua parte l’accluso • 
coupon: 

riceverai, senza impegno, 
una documentazione detta¬ 
gliata sulle stampanti HP 
e tutte le loro possibilità 
d’impiego. 
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Hewlett-Packard Italiana S.p.A. 

Via G. Di Vittorio 9 - 20063 Cernusco Sul Naviglio 
Milano-Tel. 02/923691 


Se vuoi saperne di più sulle stampanti HP invia questo 
tagliando a Hewlett-Packard Italiana S.p.A. 

Marketing Communication C.P. 10190,20100 Milano. 

Nome e Cognome_!_ 


Società _ 


Indirizzo _ 


HP-soluzioni produttive 

Whp\ HEWLETT 
XL'ftM PACKARD 








•Airborne 

Questo gioco, forse già noto ad alcuni, è una simula¬ 
zione di guerra nella quale compito della missione è la di¬ 
fesa dell'ultima postazione rimasta attiva e immune da¬ 
gli attacchi sferrati dal nemico. 

I pericoli maggiori che la missione di Airborne corre 
vengono da un commando di parà agguerriti; questi si 
lanciano dagli elicotteri di combattimento che sorvolano 
la postazione. Attenzione però anche ai caccia e ai carri 
armati che avanzano impetuosi verso l’ultimo baluardo 
della retroguardia. 

Airborne costa 109 mila lire più Iva ed è distribuito da 
Bits & Bytes, via S. Francesco d’Assisi 8, Milano, tele¬ 
fono 02 8376207. 


é Hrchiuio Edit Gestione Report Fine 


-■ COGNOME 

NOME 

INDIRIZZO 

TELEFCfr 

r— 

COMASCHI 

SERGIO 

UIR TRENTO 44 

0523/67 

L 

BRSSANETT1 

ERNESTO 

UIC0L0 M0NTELL0 2 

02/3487 


AG0STELL0 

ALBERTO 

PIAZZA GARIBALDI 16/A 

06/328? 


LUhARO 1 

MARIO 

UIR FRNFULLfì 16 

011/732 


R1CCABON1 

SILUIA 

UIR MAZZINI 8 

0523/89 


COSTRUII NI 

SERENELLA 

STRADA PROUINC IRLE N. 16 

* 


CARINE 1 

HERBERT 

UIR DELLE ROSE ROSSE 15 

* 

1 

UOLONGHI 

CARLO 

PIAZZETTA ESPOSITO 11 

02/8787 

g 


<^i| | |[^> 


□ LREfl NU0U0 CAMPO □ CREA FILE IHIRUI 

□ URRIR NOME CAMPO □ UlSUALIZZfl CHIRUI 

□ CANE ELI R CRMPO □ RICERC A UN DATO 


•Vicom 

Non appena si è lanciato sullo schermo del Mac que¬ 
sto programma, ci si rende conto che è il MacPaint delle 
comunicazioni. Così come avviene col programma grafi¬ 
co per Macintosh, infatti, Vicom presenta sul lato sini¬ 
stro dello schermo tutti gli strumenti necessari al funzio¬ 
namento, come il telefono, l'agenda, il modem, il menu 
di help, le pagine di testo e di grafica. 

Il programma funziona, oltre che come terminale TTY 
AASCII, anche come emulatore VT100/VT52, permet¬ 
tendo il collegamento con i grossi sistemi. E' possibile 
collegare contemporaneamente le due uscite seriali del 
Mac, configurandole con baudrate diversi per l'entrata e 
l’uscita, se necessario. Con Vicom, inoltre, non è più ne¬ 
cessario trasferire i documenti da un programma di scrit¬ 
tura: una sezione è infatti dedicata al word processing dei 
testi da inviare. 

Vicom è distribuito in Italia dalla Elcom, corso Italia 
149, Gorizia, telefono 0481 30909. Il prezzo al pubbli¬ 
co è di lire 378 mila al netto di Iva. 



• Atlantide 1 

Grazie ad Atlantide 1 il Mac dispone oggi di un mini¬ 
database versatilissimo e di facilissimo utilizzo (lo si 
manovra infatti integralmente con il mouse) che dimo¬ 


stra come il Microsoft Basic, se sfruttato razionalmente, 
consenta di creare un numero praticamente illimitato di 
records. Tutti i campi, inoltre, possono diventare campi- 
chiave, o cessare di esserlo, con estrema facilità. 

In ogni momento è possibile inoltre inserire nuovi 
campi ed eliminare quelli in disuso e inserire, variare, 
cancellare e stampare i records. La medesima agilità ca¬ 
ratterizza la gestione degli archivi. 

I reports, anche se composti di più pagine, possono 
essere memorizzati e stampati, anche direttamente da 
MacWrite. 

Atlantide 1, prodotto dalla Computer Team (via F.lli 
Bandiera 13, 29015 Castel San Giovanni, PC, tei. 0523 
844481) gira su Mac con almeno 512K RAM + stam¬ 
pante 80 colonne e costa L. 250.000 Iva compresa. 

•LaserWorks 

E' un tool che permette di generare fonti e grafici per 
la LaserWriter Apple traducendo le figure generate in 
istruzioni per il linguaggio PostScript usato dalla sofisti¬ 
cata stampante Apple. 

Tutto il funzionamento del programma LaserWorks si 
basa fondamentalmente sull'uso di tre strumenti: The 
Main Editor, che permette tutto l'editing necessario a 
supporto della figura generata, Goodies, che consente di 
creare particolari effetti, e infine LaserExpert, grazie al 
quale è possibile determinare corpi e stili dei caratteri ge¬ 
nerati. 

LaserWorks è distribuito in Italia dalla Elcom, corso 
Italia 149, Gorizia, telefono 0481 30909. Il prezzo al 
pubblico è di lire 820 mila. 
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Se vuoi informazioni rapide 
e concise, dai al tuo Personal 
lo strumento più efficace 
per esprimersi. 

Più sono complesse le decisioni 
che devi documentare, più diventa 
importante che tutte le informazioni 
siano immediatamente recepibili da 
chi lavora con te. 

Per questo Hewlett-Packard, all’avan¬ 
guardia nell’elettronica mondiale, ti 
propone i suoi plotter, che organizzano 
fatti e cifre complesse in grafici 
colorati, facili da comprendere. 

Con i plotter HP tendenze di merca¬ 
to, analisi di prodotto, previsioni fi¬ 
nanziarie prendono corpo in diagrammi 
precisi, curve colorate, istogrammi, grafici 
circolari, accelerano i tuoi processi 
decisionali e rendono le tue presentazioni, 
meeting, rapporti, più incisivi ed efficaci. 
Troverai i plotter HP in varie versioni: da 2 
a 8 penne, nei formati UNI A3 e A4: mentre 
per il disegno tecnico e la progettazione 
sono disponibili i due formati AO e Al. 

E potrai usarli col tuo Personal, qualunque 
esso sia, infatti i nostri plotter sono 
compatibili con i più diffusi 

Personal Computer. 

Se vuoi saperne di più, 
vai da un Rivenditore 
Autorizzato, lo trovi sulle 
Pagine Gialle alla voce 
Personal Computer, oppu¬ 
re, ti basterà compilare in 
ogni sua parte l’accluso 
coupon: riceverai, senza 
impegno, una documenta¬ 
zióne dettagliata sui 
plotter HP e il loro impiego. 


Hewlett-Packard Italiana S.p.A. 

Via G. Di Vittorio 9 - 20063 Cernusco Sul Naviglio 
Milano-Tel. 02/923691 


Se vuoi saperne di più sui Plotter HP invia questo tagliando 
a Hewlett-Packard italiana S.p.A. 

Marketing Communication C.P. 10190, 20100 Milano. 


Nome e Cognome. 
Società_ 


Indirizzo _ 


HP-soluzioni produttive 

hn HEWLETT 
T PACKARD 










un mouse. 

La sua Mouscotte. 



Niente più segni sulla scrivania. 

E una superficie liscia, ideale, appositamente 
studiata per assicurare la massima scorrevolezza 
ed efficienza al mouse. Sotto, uno strato di gomma: 
la Mouscotte non si sposta. Chiedi Mouscotte ai 
migliori Computer Shop Apple. Oppure richiedilo 
direttamente a Editronica usando il tagliando di 
questa pagina. 


r 


Per ricevere Mouscotte basta compilare e spedire subito questo 
tagliando a Editronica Srl, Corso Monforte 39, 20122 Milano. 

-! 

□ Speditemi subito Mouscotte. Accludo assegno non trasferibile 
intestato a Editronica Srl di lire 29.500 comprensive di Iva e 
spese di spedizione al mio indirizzo. 

□ Speditemi subito Mouscotte. Accludo ricevuta di versamento di I 
lire 29.500 sul conto corrente postale n. 19740208 intestato a 
Editronica Srl. 

□ Speditemi subito N.Mouscotte. Accludo ricevuta di 

versamento / assegno di lire. 


□ Desidero fattura. 

Il mio Codice fiscale/Partita Iva è:, 


Cognome . Nome. 

Indirizzo. 

Cap.Città. Prov. 


i 



•Microsoft Logo 

Il Logo, nolo anche come il lin¬ 
guaggio della tartaruga, c ora dispo¬ 
nibile anche per i personal computer 
Macintosh. 

Sviluppato dalla Microsoft, il Lo¬ 
go e un linguaggio interattivo, sem¬ 
plice, veloce e indicato per abituare i 
novizi alla metodologia richiesta dai 
personal computer: in pratica si trat¬ 
ta di un interpreter che permette l'at¬ 
tivazione immediata dei programmi 
sviluppati. 

Vengono gestite diverse finestre 
per testi, grafici e debugging di pro¬ 
grammi. Dotato di numerose funzio¬ 
ni matematiche (circa 260), è il lin¬ 
guaggio ideale per chi vuole avvici¬ 
narsi al mondo della programmazio¬ 
ne. 

In Italia Microsoft Logo è distri¬ 
buito dalla Bits & Bytes (telefono 
02 8376207), dalla Italware (02 
25141) e dalla J Soft (02 6888228), 
con un prezzo di listino di 272 mila 
lire più Iva. 


•AssoCalc 2.0 

Dedicata al settore dell'edilizia, que¬ 
sta applicazione per ingegneri effet¬ 
tua il calcolo di strutture intelaiate 
tridimensionali a impalcati rigidi, ef¬ 
fettuato tramite l'analisi statica delle 
strutture in esame. 

E' idonea per l'edificazione in zone 
sia sismiche, sia normali. 

Il programma è stato progettato 
per l’utilizzo nell'ambito della pro¬ 
gettazione di strutture medio-picco¬ 
le: permette infatti di trattare struttu¬ 
re a maglie ortogonali chiuse aventi 
al massimo 100 pilastri in pianta e 
40 telai di 19 campate l'uno. 

In aggiunta a questo, però, è possi¬ 
bile prevedere mensole e coperture a 
falde. L'utilizzo di AssoCalc è basa¬ 
to su tabelle gestite in maniera inte¬ 
rattiva con mouse e menù. 

Per il progetto e il disegno degli 
esecutivi è poi possibile utilizzare il 
programma AssoGraph; si tratta di 
un'applicazione studiata per essere 
usata in cascate, cioè come conse¬ 
guente lavorazione dei dati sviluppa¬ 
ti con AssoCalc. 

Entrambi i programmi sono pro¬ 
dotti e distribuiti dalla Asso Enginee¬ 
ring, via Tessalonica 47, Roma. Te¬ 
lefono 06/5573027. AssoCalc viene 
venduto a 900 mila lire più Iva, 
mentre AssoGraph costa 400 mila li¬ 
re più Iva. 














Notato la differenza? 



Il futuro di Apple II comincia adesso. 

Così come comincia quello di AppleWorks. 

Per questo è nata una nuova Ram che permette 
di avere a disposizione 512 Kilobyte di memoria 
in più, di lavorare in ambienti Applesoft, Pascal, 
DOS 3.3, ProDOS e CP/M fino a 30 volte più 
velocemente di prima. 

Con Z-Ram per Apple Ile e Ramwork per 
Apple Ile, AppleWorks diventa finalmente il 


Se vuoi saperne di più sulla scheda Z-Ram invia, 
senza impegno, questo tagliando a: 

Information Technology, via dei Bossi 7, 
tel.02/8692885, 20121 Milano, 

Nome. 

Cognome. 

Società. 

Indirizzo. 


n 



potente integrato che tutti aspettavano: la 
scrivania aumenta di 8 volte la capacità di lavoro 
portando il limite a 452 Kb, lo spreadsheet riesce 
a sfruttare le 999 righe e le 127 colonne, il 
wordprocessor quadruplica il numero di linee 
disponibili e, infine, il data-base arriva a gestire 
oltre 15.000 records. 

Z-Ram non è solo questo: il microprocessore che 
contiene rende compatibile la serie II con tutti i 
popolari programmi sviluppati in ambiente CP/M 
come Wordstar, dBase II, Turbo Pascal e il 
Microsoft Basic. 

Ma il futuro di Apple II non è solo questo, è 
anche MultiScribe, un word processor a livello 
di un Microsoft Word, ed è anche ReportWorks, 
un generatore di rapporti. • 

E soprattutto è la forza e l'intelligenza di chi ogni 
giorno ci lavora. 





.Città. 
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Information technology 
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FATEVI FURBI, 
SCEGLIETE UNA 
STAMPANTE NEC 

Un numero sempre maggiore di utenti si 
sta convincendo che è meglio collegare 
una stampante NEC, al posto delle stan¬ 
dard offerte dai costruttori di computer. 
Di qualsiasi marca sia il computer, la 
stampante deve avere prestazioni bril¬ 
lanti, altrimenti non è in grado di espri¬ 
mere al meglio tutte le possibilità di out¬ 
put e vale la metà del suo valore. Perciò 
non lasciatevi convincere ad acquistare 
le solite stampanti con tecnologia supe¬ 
rata a prezzi elevati, provate subito una 
NEC. 

NEC ha una linea completa di stampanti, 
che rappresentano sicuramente la punta 
più innovativa del settore: una testina ri¬ 
voluzionaria a 24 aghi per un carattere 
più brillante e più chiaro. Grande velocità 
nel draft a 270 cps, come nel letter quali- 
ty a 88 cps. Elevata risoluzione grafica a 
360 x 360 punti per pollice per fornire 
grafici ed illustrazioni professionali. 8 co¬ 
lori. Font di caratteri selezionabili per da¬ 
re più stile a lettere e documenti. Vasta 
scelta di dispositivi per gestione moduli¬ 
stica. Silenziosità incrementata fino a 
48dBA. Ed ora prestazioni imbattibili con 
le nuove LASER printers NEC LC 800. 
Ora sapete qual’è la scelta più astuta. 


NEC 

GRANDE TECNOLOGIA 
GRANDt PRESTAZIONI 



Pinwriter P6 


NEC 


uiuiTRuNiC^ 
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Digitronica S.p.A. - Corso Milano, 88 - 37138 VERONA - Tel. 045/577988 - Telex 481212 DIGIVR I 


NEC Business Systems 
(Deutschland) GmbH 

Agenti Digitronica: 

MILANO tei. 02/872361-2 - TORINO tei. 011/7804069 
FIRENZE tei. 055/4377767 - MODENA tei. 059/281113 
TERAMO tei. 085/8942450 









UTILITY 



Un'accoppiata vincente per il programmatore in Applesoft: potenti e 
raffinate, queste due utility utilizzano i comandi 
ampersand per compattare, incrementare, facilitare, concatenare... 

Accoppiata 

vincente 


Pubblicarne i listati non è possibi¬ 
le: ci vorrebbe una rivista in più. 
Ma rinunciare a questa accoppiata di 
utility per chi si cimenta con le fati¬ 
che e le gioie della programmazione 
non è davvero possibile. 

Ecco perché Applicando ve le pro¬ 
pone riunite in un apposito dischet¬ 
to, ordinabile a prezzo di costo con 
il tagliando del Disk Service, e ve le 
presenta in queste pagine. 

Sono SupcrChargcr e Crunch- 
Decrunch. 

Il primo è un programma che com¬ 
prime le immagini in alta risoluzio¬ 
ne in modo che occupino molto me¬ 


Fra le caratteristiche che l'Apple 
invidia a qualche altro computer c'è 
l'istruzione PRINT USING che per¬ 
mette al programmatore di formatta¬ 
re un'intera linea di output (sia nu¬ 
merico sia stringa) con uri"immagi- 
ne" che definisce il formato dell'ou¬ 
tput; o la capacità di collegamento 
fra programmi che utilizza un'istru¬ 
zione COM per controllare quali va¬ 
riabili vengano trasmesse fra i pro¬ 
grammi. Essa può sovrapporre il 
nuovo programma al vecchio, con¬ 
servando al tempo stesso qualcuna 
delle istruzioni del vecchio pro¬ 
gramma. 

L'Applesoft Supercharger mette a 
disposizione comandi che consento¬ 
no di controllare facilmente l’input 
da utente, cambiare il suono del se¬ 
gnale d’errore, e concatenare due pro¬ 
grammi conservando al tempo stes¬ 


no spazio sul dischetto. Invece di ca¬ 
ricare l’immagine con BLOAD la si 
esegue con BRUN, e il breve pro¬ 
gramma in linguaggio macchina sal¬ 
vato con ogni immagine espande i 
dati compressi, che così riempiono 
l’intero schermo Hi-Res. 

L’altra utility, basata sul comando 
ampersand (&), estende il potenziale 
dell’Applesoft in DOS 3.3. 

Permette di formattare l'output, 
controllare la lunghezza e il tipo del¬ 
l'input, cambiare il suono del segna¬ 
le d'errore, concatenare due program¬ 
mi dichiarando variabili comuni, e 
altro ancora. 


so le variabili designate. Se avete 
una stampante con una normale in¬ 
terfaccia parallela Apple o Epson po¬ 
trete facilmente riversare il contenu¬ 
to della schermata di testo sulla vo¬ 
stra stampante. 

L'Applesoft Supercharger è colle¬ 
gato all'Applesoft tramite il coman¬ 
do ampersand (&). Per utilizzarlo 
nell’ambito del vosLro programma 
dovete compiere le seguenti quattro 
operazioni all'inizio del vostro pro¬ 
gramma: 


•BLOAD SUPERCHARGER.OBJO 
•CALL 777 

•POKE 770,slot (dove slot è il nu¬ 
mero di slot della vostra interfaccia 
stampante) 

•BLOAD SUPERCHARGER.OBJ1 


Dato che queste attività cambieran¬ 


Figura 1. Esempio la: 
programma esemplificativo 

10 D$ = CHR$ (4) 

20 PRINT D$"MONICO H 
30 PRINT D$"OPEN TEST" 

40 PRINT D$"WRITE TEST" 

50 FORU0TO5 

60 & PRNTUSNG:"###.##",999 * RND 
(1);: REM SI NOTI SOPPRESSIONE 
C/R 

70 NEXTI 

80 PRINT: REM C/R 
90 PRINT D$"CLOSE" 

100 PRINT D$"OPEN TEST" 

110 PRINT D$"READ TEST" 

120 & INPTA$ 

130 FORI = 0 TO 5 
140 E(l) = VAL ( MID$ (A$,l *6 + 1,6)) 
150 PRINT E(l) 

160 NEXT I 

170 PRINT D$"CLOSE" 

180 PRINT D$"NOMONICO" 

190 END 


no le parti della memoria che sono 
utilizzate per immagazzinare le varia¬ 
bili stringa, occorre compierle prima 
della definizione delle variabili. Fate 
attenzione a non avere altre utility di 
programma residenti quando usate 
questo pacchetto, in quanto molte di 
esse usano le stesse locazioni di me¬ 
moria. 

L'Applesoft Supercharger impiega 
il comando ampersand per dirigere il 
flusso di programma su un breve in¬ 
terprete in linguaggio macchina. 
Questo interprete esplora in succes¬ 
sione i caratteri che seguono l'amper- 
sand per determinare se sia stato 
emesso uno di vari comandi validi. 
In caso affermativo l'elaborazione è 
diretta alla routine che gestisce quel¬ 
lo specifico comando. La sezione 
che segue descrive nei particolari 
ognuno dei comandi. 


I 


Supercharger 
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Figura 2. Esempio 1b: 
output esemplificativo 

]RUN 
MONICO 
OPEN TEST 
WRITE TEST 

972.16103.01 17.69778.56551 
.28616.80 
CLOSE 
OPEN TEST 
READ TEST 

972.16103.01 17.69778.56551 
.28616.80 
972.16 
103.01 
17.69 
778.56 
551.28 
616.8 
CLOSE 
NOMONICO 


Il comando 
&LINE 

&LINE è un semplice cornando 
per l'introduzione di dati numerici o 
stringa con un formato o numero di 
caratteri predefinito. La sintassi del 
comando è: 


&LINE (aexprl ,aexpr2,aexpr3 ,ae- 

xpr4,aexpr5;var) 

dove: 

acxprl = lunghezza del campo 
acxpr2 = numero dei decimali 
aexpr3 = tipo di carattere dell'input 
aexpr4 = posizione di tabulazione 
orizzontale 

aexpr5 = posizione di tabulazione 
verticale 

var = variabile di output 


La variabile di lunghezza del cam¬ 
po (aexprl) definisce il numero dei 
caratteri di sottolineatura da visualiz¬ 
zare sullo schermo per il campo di 
input, fino a un massimo di 255 ca¬ 
ratteri. 

Alla fine del campo viene messo 
uno spazio per fornire una locazione 
di arresto per il cursore. Se cercate di 
introdurre caratteri in numero supe¬ 
riore a quello specificato il cursore ri¬ 
marrà fermo, e l'altoparlante emette¬ 
rà un bip d'errore. 

Se come carattere di prompt non 
volete la sottolineatura potete cam¬ 
biarlo facendo POKE 772,CHR, dó¬ 
ve CHR è il valore ASCII del carat¬ 


tere desiderato più 128. Per esempio 
POKE 772,174 visualizzerebbe una 
fila di punti in luogo dei caratteri di 
sottolineatura. 

Aexpr2 provvede un punto decima¬ 
le nella locazione esatta per indicare 
il numero esatto di decimali previsto 
nella voce introdotta. 

Il valore di aexpr2 dev'essere sem¬ 
pre minore di aexprl, fino a un mas¬ 
simo di 254. Un valore diverso da ze¬ 
ro per aexpr3 significa input alfanu¬ 
merico e permette di battere qualsia¬ 
si carattere. 

Se acxpr3 è zero è permessa solo 
l'introduzione numerica; l'altoparlan¬ 
te segnalerà una condizione d'errore 
se viene battuto un carattere che non 
sia una cifra da 0 a 9, un -, un + o 
un punto decimale. 

Per i campi numerici &LINE fa 
l'arrotondamento al giusto numero 
di decimali. 

Inoltre controlla l'arco d'introduzio¬ 
ne. Se specificate un campo di sei ca¬ 
ratteri con due decimali accetterà so¬ 
lo un input compreso fra -999.99 e 
9999.99. Qualsiasi tentativo di intro¬ 
durre un valore maggiore avrà come 
conseguenza un campanello d'errore 
e l'azzeramento del campo d'introdu¬ 
zione. 

Notate che il segno di meno conta 
come carattere, c quindi tenetene con¬ 
to quando determinate il valore che 
volete per aexprl. 

Le posizioni di tabulazione oriz¬ 
zontale e verticale (acxpr4 e acxpr5) 
definiscono la locazione di schermo 
per il campo di input. Il valore di 
HTAB dev'essere compreso fra 1 e 
40, mentre il valore di VTAB dev'es¬ 
sere compreso fra 1 e 24. Se i para¬ 
metri specificati tentano di estendere 
&LINE oltre la finestra di testo pos¬ 
sono accadere cose strane. La varia¬ 
bile di output, che è preceduta da un 
punto e virgola (;), può essere qual¬ 
siasi variabile valida a punto mobi¬ 
le, intera o stringa. 

Se l'operatore definisce aexpr3 co¬ 
me stringa e la variabile di output 
come campo numerico ne deriverà 
un errore di TYPE MISMATCH. Se 
invece aexpr3 c definita come nume¬ 
rica e la variabile di output è una 
stringa non si verificherà alcun erro¬ 
re. 

, Questo è utile quando volete defini¬ 
re variabili quali i numeri di conto 
corrente, per esempio, la cui lun¬ 
ghezza può superare di gran lunga la 
capacità di formattazione numerica 
dell'Applesoft. 


Tutti i caratteri della tastiera (tran¬ 
ne i caratteri di controllo) sono accet¬ 
tati dalla routine di input. Adesso pe¬ 
rò la freccia sinistra cancella i caratte¬ 
ri su cui passa. 

Nell'Apple Ile e nel Ile si possono 
introdurre come di consueto caratteri 
maiuscoli e minuscoli azionando il 
tasto shift. 

In un Apple II-Plus che sia stato 
modificato per la visualizzazione del¬ 
le minuscole si può usare il tasto 
<ESC> per commutare fra l’input 
maiuscolo e quello minuscolo. 

Per disabilitare questa caratteristica 
il vostro programma deve fare PO¬ 
KE 771,0 prima dell'uso del coman¬ 
do &LINE. 

A meno che non si disabiliti la 
commutazione il tasto <ESC> fun¬ 
ziona come segue. Nel modo maiu¬ 
scolo premendo una volta <ESC> si 
passa al minuscolo. Nel modo minu¬ 
scolo premendo una volta <ESC> si 
passa al maiuscolo per il solo carat¬ 
tere seguente, poi si torna al minu¬ 
scolo. 

Premendo due volte <ESC> nel 
modo minuscolo si passa al maiu¬ 
scolo fino a quando si preme nuova¬ 
mente <ESC>. Quando viene chia¬ 
mato il comando esso va per default 
al modo maiuscolo. 

Battendo <CTRL>P si fa sì che il 
sistema riversi il contenuto della 
schermata di testo su una stampante 
parallela, come descritto nel paragra¬ 
fo &SCREEN. Il numero di slot del¬ 
la stampante dev’essere specificato 
da POKE 770,slot all’inizio del vo¬ 
stro programma. Se non è stato spe¬ 
cificato lo slot della stampante il co¬ 
mando viene ignorato. Per disabilita¬ 
re il modo di stampa della schermata 
usate POKE 770,255. 

Per gli utenti dell'Apple II Plus 
<CTRL>A,<CTRL>B, <CTRL>C, 
<CTRL>D e <CTRL>E visualizza¬ 
no rispettivamente, nel modo maiu¬ 
scolo, la parentesi quadra sinistra ([), 
la barra inversa (\), la parentesi qua¬ 
dra destra (]), il segno di omissione 
( A ) c la sottolineatura (__). 

Nel modo minuscolo questi tasti 
generano invece la graffa sinistra ({), 
la barra (I), la graffa destra ()), la til¬ 
de (~) e il carattere del box del cur¬ 
sore. 

Quando si esce da &LINE non vie¬ 
ne inviato allo schermo alcun caratte¬ 
re di ritorno carrello. 

Qualsiasi stampa fatta dopo aver 
eseguito questa funzione dev'esesere 
preceduta da un ritorno carrello. 
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I comandi &BUZZ, 

&INPT e &SCREEN 

Il comando &BUZZ c semplice¬ 
mente un metodo per far emettere un 
suono dall’altoparlante dell'Apple 
(per le condizioni di errore, gli avver¬ 
timenti e via dicendo). La sintassi è: 
&BUZZ (aexprl,aexpr2), dove aexpr 
1 è un numero relativo all'altezza del 
suono e aexpr2 è un numero relativo 
alla durata. 

Più alto è il valore di aexprl più 
grave è il suono. Usate un valore ele¬ 
vato di aexpr2 per avere suoni più 
lunghi. Sia aexprl sia aexpr2 devo¬ 
no essere superiori o uguali a zero, e 
minori di 256. &BUZZ(0,0) equiva¬ 
le a &BUZZ(256,256). 

Il comando &INPT è una routine 
che permette di leggere le stringhe 
da un file di testo del dischetto. Le 
stringhe di input possono contenere 
virgole, virgolette e due punti, che 
normalmente fanno da delimitatori 
dell'istruzione input del Basic. La 
sintassi di questo comando è &INPT 
svar, dove svar è la variabile stringa 
da leggere. 

Il comando &SCREEN mette a di¬ 
sposizione dell'operatore un metodo 
per riversare il contenuto di un'intera 
schermata di testo su una stampante 
con un'interfaccia parallela standard 
Apple o Epson. La sintassi è: 
&SCREEN (aexpr), dove aexpr ò il 
numero di slot della stampante. 

&SCREEN modifica il proprio co¬ 
dice per consentirgli l'accesso a qual¬ 
siasi slot. State attenti a questo fatto 
.se tentate qualche modifica. 

&SET, &RSET, 

&FLAGe &COM 

In molte applicazioni commerciali 
si deve fare frequente uso dei flag 
per indicare se è stato stampato un 
prospetto, è stata eseguita un’opera¬ 
zione di spunta e via dicendo. 

I modi più comuni per generare un 
flag consistono nella creazione di 
una stringa con i valori ammessi di 
S o N, o nella definizione di una va¬ 
riabile numerica con i valori ammes¬ 
si di 1 o 0. 

Quando si salva su dischetto viene 
usato un intero byte per conservare 
informazioni che potrebbero essere 
contenute in un bit. 

Questo può causare lo sciupio di 
un po' di spazio sul dischetto qualo¬ 
ra un particolare file richieda molti 
di questi indicatori. Un'alternativa 


Tavola 1: Sommario dei comandi 

&LINE(aexpr1,aexpr2,aexpr3,aexpr4,aexpr5;var) 

stabilisce un campo d’input sullo schermo 
aexprl = lunghezza del campo 
aexpr2 = numero dei decimali 
aexpr3 = tipo del carattere d’input 
aexpr4 = posizione tab orizzontale 
aexpr5 = posizione tab verticale 

&BUZZ(aexpr1 ,aexpr2) 

genera un suono 

aexprl = numero relativo all'altezza del suono 
aexpr2 = numero relativo alla durata 

&INPT svar 

accetta una variabile stringa, ignorando i delimitatori 
svar = variabile stringa da leggere 

&SCREEN(aexpr) 

stampa la schermata di testo su una stampante con interfaccia parallela 
standard Epson o Apple. 
aexpr = numero di slot della stampante 

&SET(var,aexpr) 

imposta su 1 il bit aexpr della variabile var 

&RSET(var,aexpr) 

imposta su 0 il bit aexpr della variabile var 

&FLAG(var,aexpr ;avar) 

mette avar uguale allo stato del bit aexpr della variabile var 
var = variabile che contiene i bit di flag 
aexpr = numero del bit su cui operare 
avar = variabile di output per lo stato del bit 

&COM: var {[,varl} 

imposta i puntatori per salvare le variabili precedentemente 
assegnate fino a var 

var = variabile cui impostare il puntatore COM 

&CHAIN(numlin,sexpr,aexprl,aexpr2,aexpr3[,aexpr4]) 

carica ed esegue un programma, salvando le variabili specificate da 

&COM 

numlin = numero di linea per caricare ed eseguire il nuovo programma 
sexpr = nome del nuovo programma 
aexprl = numero di volume del dischetto (0 = qualsiasi volume) 
aexpr2 = numero di slot del drive (0 = ultimo slot usato) 
aexpr3 = numero del drive (0 = ultimo drive usato) 
aexpr4 = nuova impostazione di LOMEM (facoltativa) 

&PRNTUSNG:sexpr {[,expr]} [;] 

genera l’output con il formato descritto in sexpr 
sexpr = la stringa di formato della linea 
expr = il contenuto dei campi stampati 
; = soppressione del ritorno carrello 

&FIX 

ripristina il puntatore di stack dopo che è stato intrappolato un errore con 

ONERRGOTO 


consiste nell'impostare singoli bit di 
un dato byte a segnalare una condi¬ 
zione booleana. Nel Basic questo sa¬ 
rebbe molto lento e richiederebbe di¬ 
verse lince di codice. 

E' giustificata quindi una soluzio¬ 
ne in codice macchina. La sintassi 
per i tre comandi di flag è: 


&SET(var, aexpr) 

&RSET(var,aexpr) 

&FLAG (var,aexpr ;avar) 

dove var = variabile contenente i bit 

del flag 

aexpr = numero del bit 
avar = variabile di output per lo sta¬ 
to del bit 
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&SET mette a 1 (on) il numero di 
bit (aexpr) della variabile (var). 
&RSET ripristina il numero di bit 
(aexpr) della variabile (var) e mette 
(avar) uguale a quel valore (0 o 1). 
Bit 1 è il primo bit del primo byte e 
bit 8 è Tultimo bit del primo byte. 
Bit 9 è il primo bit del secondo 
byte, e così via. 

Se da un lato queste funzioni sem¬ 
brano molto semplici dall'altro pos¬ 
sono causare notevoli problemi, par¬ 
ticolarmente se occorre salvare la va¬ 
riabile di stato del flag in un file di 
testo del dischetto. Queste funzioni 
hanno assai poco in fatto di control¬ 
lo deirerrore. Si limitano infatti a 
mettere a uno o a zero e a leggere i 
bit, cominciando dall'area dati della 
variabile. 

Se var è una variabile a punto mo¬ 
bile e tutti i bit del primo byte sono 
messi a zero tutte le operazioni di 
stampa stamperanno var come zero. 
Se questa variabile viene salvata sul 
dischetto lo stato di tutti i bit che se¬ 
guono il bit 8 va perduto. Inotre l'ar¬ 
rotondamento nella stampa delle va¬ 
riabili a punto mobile può avere co¬ 
me conseguenza la perdita dello sta¬ 
to dei bit meno significativi. 


Se var è una stringa il problema è 
ancor più singolare. In questo caso i 
bit che vengono modificati sono il 
puntatore di stringa, e quindi la ma¬ 
nipolazione di questi bit può modifi¬ 
care la lunghezza della stringa e/o 
puntare a una locazione errata in me¬ 
moria per trovare la stringa. 

Se invece var è una variabile inte¬ 
ra questi problemi non si presenta¬ 
no. In ogni variabile intera si posso¬ 
no controllare fino a sedici bit. 

&FLAG restituisce il valore del 
bit specificato (aexpr) entro una va¬ 
riabile (var) a una seconda variabile 
(avar) che dev'essere numerica. Un 
modo facile per visualizzare l'impo¬ 
stazione di un flag, diciamo il bit A 
della variabile intera F%, consiste 
nella seguente coppia di istruzioni: 


&FLAG(F%,A;B):PRINT"ILBIT"; 
A;"E'”;MID$("OFFON M ,1+3*B,3) 


Notate lo spazio di coda nella strin¬ 
ga "OFFON ". Aexpr può avere qual¬ 
siasi valore integrale da 1 a 255, il 
che significa che si possono modifi¬ 
care i bit fino a INT(256/8), ossia 
32 byte dalla locazione della (var) 
che si specifica. Quando si assegna¬ 


no i flag alle variabili intere è me¬ 
glio cominciare dal bit 16 e operare 
verso numeri di bit decrescenti. Il 
bit 16 è il bit meno significativo del 
byte meno significativo di una varia¬ 
bile intera. Il bit 1 è il bit più signi¬ 
ficativo del byte più significativo 
(in realtà è il bit di segno). Per esem¬ 
pio se avete A% = 0 allora: 


&SET(A%,16) 

pone A% uguale a 1, mentre: 

&SET((A%,1) 

pone A% uguale a -32768. 


Questo non fa risparmiare memoria 
quando si salva sul dischetto lo stato 
di un bit (anzi causa una perdita!). 

Quando si collegano fra loro pro¬ 
grammi in Applesoft (se ne fa cioè 
il concatenamento) certe applicazio¬ 
ni richiedono che si controlli quali 
variabili vengono passate al secondo 
programma. Questo si ottiene usan¬ 
do l'istruzione COM (abbreviazione 
di COMMON, comune). 

La sintassi è &COM: var ([,var]), 
dove var è la variabile alla quale è 
impostato il puntatore COM. 

In Applesoft ci sono due aree nelle 
quali si immagazzinano le variabili 
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e i puntatori di stringa. Una delle 
aree, in locazione immediatamente 
sopra il testo del programma (a me¬ 
no che non sia rilocata da un'istruzio¬ 
ne LOMEM) immagazzina le varia¬ 
bili semplici. La seconda area è im¬ 
mediatamente sopra di questa e con¬ 
serva le matrici. Di regola un'istru¬ 
zione &COM dovrebbe specificare 
una variabile in entrambe queste 
aree. 

Per comprendere come usare 
&COM si deve prima comprendere 
come l'Applesoft organizza la sua ta¬ 
vola delle variabili. Viene creato lo 
spazio per una variabile semplice 
ogni qualvolta essa viene assegnata, 
con le prime variabili assegnate si¬ 
tuate al fondo (indirizzi bassi) dell'a¬ 
rea delle variabili. Questo vale sia 
per le variabili semplici sia per le 
matrici. 

Quando viene creata una variabile 
semplice le eventuali matrici sono 
spostate in su nella memoria per far¬ 
le posto. 

&COM contiene un puntatore per 
farea delle variabili semplici e un 
puntatore per l'area delle matrici. 
Questi puntatori dicono quanti byte 
delle loro rispettive arce devono es¬ 


sere salvati nel passaggio da un pro¬ 
gramma all'altro. L'area è misurata 
dall'indirizzo iniziale delle rispettive 
aree. 

Per vedere come la cosa funzioni 
considerate l'esempio che segue. 

Le variabili semplici A, B, C, D, 
E, F, C$ e D% sono assegnate in 
quest'ordine nell'esecuzione del vo¬ 
stro programma, insieme con le ma¬ 
trici A(10,40),C$(5,4,9) e D%(122). 
L’inserimento nel programma dell'i¬ 
struzione: &COM:D,C$(5,4,9) farà 
sì che A, B, C, D e le matrici A e 
C$ vengano passate al programma 
successivo. Tutte le altre variabili sa¬ 
ranno azzerate. Volendo, il secondo 
programma potrebbe creare una nuo¬ 
va matrice D%(1000) senza RE- 
DIM’D ARRAY ERROR (errore di 
ridimensionamento della matrice). 

Per una matrice deve essere specifi¬ 
cata la dimensione massima, altri¬ 
menti i puntatori di variabile scom¬ 
binati possono estromettervi dall'Ap- 
plesoft. 

Se vi doveste trovare a guardare 
caratteri privi di senso sulla pagina 
2 di testo quando effettuate un 
&CHAIN controllate la dimensione 
della matrice. Se le vostre matrici 


visualizzano cose senza senso con¬ 
trollate i puntatori di variabile sem¬ 
plice. 

E' importante rilevare che l’istru¬ 
zione &COM non fa che impostare 
i puntatori, e non elimina realmente 
le variabili dalla memoria. L’opera¬ 
zione di azzeramento c effettuata nel 
comando &CHAIN. 

Notate inoltre che &CHAIN non 
modifica i puntatori COM. Se il se¬ 
condo programma non contiene alcu¬ 
na istruzione &COM e compie un 
&CHAIN a un terzo programma le 
stesse variabili che sono state passa¬ 
te al secondo programma saranno 
passate al terzo programma. Se vole¬ 
te azzerare tutte le matrici usate PO- 
KE 775,0:POKE 776,0 nel vostro 
programma. 

Per azzerare tutte le variabili sem¬ 
plici fatePOKE 773,0:POKE 774,0. 

Il comando &CHAIN 

Può accadere talvolta che un pro¬ 
grammatore realizzi un'applicazione 
troppo vasta per risiedere nella 
RAM. 

Un modo per uscire da questo di¬ 
lemma consiste nel dividere il prò- 



macspace 

prospettive 

d'avvenire 

CAD per disegni tridimensionali 
con MACINTOSH 


FACILE: con Mac Space ottenete disegni in 
tridimensione lavorando sulla sola vista in piano. 
POTENTE: automaticamente Mac Space 
visualizza oltre al vostro lavoro in piano, anche 
la vista laterale, quella frontale e l'assonometria. 
In qualsiasi momento é possibile visualizzare in 
prospettiva,da qualsiasi punto di vista, l'oggetto 
disegnato, con possibilità di zoom all'infinito. 
FLESSIBILE: Mac Space stampa direttamente 
su plotter oltre che su Laser e Image Writer. 

Distribuito da: 


JgersonalOampmter, 


Via Chiapponi, 42-29100 PIACENZA 
tei. (0523) 20.626 

disponibile presso i migliori APPLE CENTER 




































































































































































Come lavora Crunch-Decrunch 

Anche senza listato, è interessante osservare le sue funzioni e variabili: 

Funzioni del programma 

Linee 80-120 Visualizzano il titolo della pagina 
Linee 130-150 Caricano il file binario e attendono che venga premuta 
la barra spaziatrice 

Linee 160-240 Caricano e visualizzano la figura 
Linee 250-300 Compattano la routine 
Linee 310-450 Salva la figura e riparte 
Linee 460-470 Routine di errore 

Variabili 

A Numero della pagina grafica dell'alta risoluzione (default=1 ) 

B Fine del file 

I Variabile del ciclo 

J Variabile del ciclo 

L Lunghezza del file 

M Numero dei blocchi del file 

A$ Vecchio nome del file e stringa temporanea 

C$ Nuovo nome del file 

FROM Puntatore alla pagina grafica 

TO Puntatore alla posizione nel file 

PAGE Numero di pagina per puntare alla routine INIT 


gramma in segmenti che siano cari¬ 
cati ed eseguiti separatamente ma ab¬ 
biano accesso alle stesse variabili. 

E T appunto questo lo scopo di 
&CHAIN. 

Il vantaggio di &CHAIN nei con¬ 
fonti del programma di concatena¬ 
mento del dischetto System Master 
del DOS 3.3 è che azzera tutte le va¬ 
riabili non comuni, quali sono state 
impostate dall'&COM descritto so¬ 
pra, e permette di sovrapporre il se¬ 
condo programma a parte del pro¬ 
gramma chiamante. Per esempio 
considerate due programmi, A e B, 
con il programma A che si concate¬ 
na con il programma B quando è fi¬ 
nito: 


10 REM PROGRAMMA A 
20 GOTO 100 

30 FOR I = 0 TO 30: PRINT A%(I) 
NEXT 
40 RETURN 

100A=1:B=2:C=3:DIMA%(30),B 

( 20 ) 

110 FOR 1 = 0 TO 30 
120 A%(I) = 1*1 
130 NEXT 

200 &COM:B,A%(30) 

300 &CHAIN(100,"B M ,0,0,0) 

100 REM PROGRAMMA B 
110GOSUB 30 
120 END 


Supponendole TApplesoftSuper- 
charger sia attivo quando viene ese¬ 
guito il programma A, vengono as¬ 
segnate le variabili e le matrici date. 


L’istruzione &COM imposta i suoi 
puntatori a linea 200. Quando si in¬ 
contra &CHAIN tutte le variabili 
non comuni e le stringhe inutilizza¬ 
te vengono azzerate. Viene letta la 
lunghezza del programma e tutte le 
variabili sono spostate in su alla lo¬ 
ro nuova locazione operativa, fuori 
del programma da caricare. 

Il programma viene letto all'inizio 
della linea 100 del programma A. Se 
non c’è linea 100 nel programma A 
il puntatore viene impostato all’ini¬ 
zio del successivo numero più alto. 
Il numero di linea 100 e tutti quelli 
più alti di 100 del programma A so¬ 
no ora scomparsi. 

Dovete sempre fare il concatena¬ 
mento con un programma che sia nu¬ 
merato alla linea specificata nell'i¬ 
struzione &CHAIN o sopra di essa, 
in quanto l'esecuzione del program¬ 
ma riprenderà dalla prima linea del 
programma B a prescindere dal nume¬ 
ro di linea. Nel nostro esempio l'i¬ 
struzione GOSUB 30 funziona nor¬ 
malmente, accedendo alla subroutine 
rimasta in memoria dal programma 
A. Se il programma B ha numeri di 
linea inferiori a 100 essi saranno ese¬ 
guiti immediatamente dopo che il 
programma B è stato portato in me¬ 
moria ma saranno ignorati da even¬ 
tuali istruzioni GOTO; saranno inve¬ 
ce usate le linee inferiori rimaste dal 
programma A. Se il programma B 
comincia con numeri di linea mag¬ 
giori di 100 l’esecuzione procederà 
normalmente. Se fosse listato il pro¬ 


gramma attualmente in memoria es¬ 
so si presenterebbe così: 


10 REM PROGRAMMA A 
20 GOTO 100 

30 FOR I = 0 TO 30: PRINT A%(I) 
:NEXT 
40 RETURN 

100 REM PROGRAMMA B 
110 GOSUB 30 
120 END 


L'utilità di &CHAIN si vede so¬ 
prattutto quando le subroutine o se¬ 
zioni di istruzioni comuni ai pro¬ 
grammi interessati sono in locazio¬ 
ne all'inizio del primo programma e 
sono mantenute con &CHAIN. Esse 
hanno comunque un'esecuzione più 
rapida da quella locazione. Inoltre 
&CHAIN aiuta a salvare spazio sul 
dischetto, permettendo che le routine 
comuni siano situate in un unico 
programma anziché in tutti i pro¬ 
grammi richiesti in un'esecuzione 
multi-programma. 

La sintassi per il comando di con¬ 
catenamento è: 

&CHAIN(numlinea,sexpr,aexprl ,ae- 

xpr2,aexpr3[,aexpr4j) 

dove numlinea = numero di linea al 

quale il programma viene caricato ed 

eseguito 

sexpr = nome del nuovo programma 
aexprl = numero di volume del di¬ 
schetto (0 = qualsiasi volume) 
acxpr2 = numero di slot del drive (0 
= ultimo slot utilizzato) 
acxpr3 = numero del drive (0 = ulti¬ 
mo drive utilizzato) 
aexpr4 = la nuova impostazione di 
LOMEM (facoltativa) 

L'opzione della nuova LOMEM è 
utile per le applicazioni grafiche in 
Hi-Res quando si vuol tenere il pro¬ 
gramma sotto la memoria grafica e 
le variabili sopra la memoria grafi¬ 
ca. Se aexpr4 non è specificata o è 
impostata sotto la fine del program¬ 
ma che si sta caricando, sarà reimpo¬ 
stata alla fine del programma. Se 
volete eliminare il programma A 
specificate numlinea come zero, e sa¬ 
rà interamente sostituito dal pro¬ 
gramma B. 

Eccoqualcheimportanteannotazio- 
ne a proposito di &CHAIN: 

1. Le funzioni definite non vengono 
passate da &CHAIN. Devono essere 
specificate nel programma che le 
usa. 

2. Non c'è alcun controllo della sin¬ 
tassi sui nomi dei file. Verrà ricerca¬ 
ta qualsiasi stringa. 


72 








3. Il puntatore di DATA viene impo¬ 
stato sull’effettivo inizio del pro¬ 
gramma, come un RESTORE del 
Basic. Alle eventuali istruzioni DA¬ 
TA nel programma chiamante tenu¬ 
te da &CHAIN si accederà per prima 
cosa in eventuali READ. 

4. Lo stack elaboratore è azzerato da 
&CHAIN. Tentando di fare il conca¬ 
tenamento con CHAIN daH’interno 
di una subroutine di programma Ba¬ 
sic si avrà come conseguenza che la 
subroutine verrà "dimenticata”. 

&OHAIN supporta tutti gli errori 
del DOS. Ogni volta che si effettua 
l’accesso al dischetto le variabili so¬ 
no in locazioni operative (sempreche 
le variabili necessarie siano state sal¬ 
vate con &COM:) e una routine di 
gestione deH'errore può gestire la 
maggior parte dei problemi relativi 
al dischetto. Può darsi però che sia¬ 
no generati errori di OUT OF ME¬ 
MORY (memoria esaurita) dopo che 
il programma è stato caricato; essi 
avvengono se la sommità della me¬ 
moria delle variabili viene a collisio¬ 
ne con la memoria delle stringhe. 
Qualsiasi stringa della regione di ac¬ 
cavallamento sarà distrutta, e qualun¬ 
que tentativo programmato di rime¬ 
diare all’errore dovrà tener conto di 
questo fatto. 

I comandi 

&PRNTUSNG e &FIX 

Una delle omissioni più sconfor¬ 
tanti dell’Applesoft Basic è quella 
del comando PRINT USING. La sin¬ 
tassi del comando è: 
&PRINTUSNG:sexpr {,expr} [;] 
dove sexpr = la stringa di formato 
della linea 

expr = il contenuto dei campi 
stampati 

= soppressione del ritorno carrello 

Un esempio costituisce la miglio¬ 
re spiegazione della duttilità di que¬ 
sto metodo. Considerate il pro¬ 
gramma: 

10 F$=”NOME: ########## 

$###,###.##” 

20 N$=”W.T. BRIDGMAN”:A = 
10300.4 

30 &PRNTUSNG:F$,NS,A 
40 PRINT FS 

Battendo RUN vedrete: 

NOME: W.T. BRIDG $10,300.40 

Notate che se la stringa da stampa¬ 
re è troppo lunga viene troncata al 
numero consentito di spazi. Se è 
troppo corta viene aggiunto il nume¬ 
ro di spazi appropriato per riempire 


il campo. Per i campi numerici ven¬ 
gono usati le virgole e i punti deci¬ 
mali per controllare la formattazio¬ 
ne. 

Se il numero è troppo grande per 
il campo numerico viene stampato 
il campo di formato stesso. In altre 
parole se a linea 20 si avesse A = 
5000000.0456 l’output sarebbe: 
NOME: W.T. BRIDG $###,###.## 

L’altra condizione che genererà un 
overflow come quello visto sopra si 
ha se l'esponente stampato è maggio¬ 
re di zero. Per esempio un numero 
come 1.234E12 causerà un over¬ 
flow. Non si avrà invece overflow 
per 1.234E-12. 

Come per &LINE un segno di me¬ 
no conta come un carattere singolo. 
Questo pone limiti differenti alla 
stampa dei numeri positivi e negati¬ 
vi. Per un campo definito da 
###,###.## il limite positivo è 
999,999.99, mentre il limite negati¬ 
vo è -99,999.99. 

Se volete proteggere i campi ini¬ 
ziali durante l'input numerico (ad 
esempio per le buste paga o gli asse¬ 
gni di pagamento ai fornitori) mette¬ 
te un asterisco (*) al posto delle ci¬ 
fre iniziali. Quando F$ è definito co¬ 
me "*##,###.##’’, e A è definito co¬ 
me 105.3, &PRNTUSNG:F$,A dà: 
****105.30 

Un malanno particolare di 
&PRNTUSNG è la facilità di genera¬ 
re errori di FORMULA TOO COM- 
PLEX (formula troppo complessa). 
Questi si verificano a quanto sembra 
con l'uso di funzioni stringa come 
LEFTS, RIGHTS e MID$. Se c’è 
questo problema controllate il nu¬ 
mero dei caratteri che state cercando 
di ottenere dall’argomento della strin¬ 
ga. 

Se specificate più caratteri di quan¬ 
ti siano disponibili il risultato verrà 
stampato, ma incapperete in quell’er¬ 
rore più tardi. 

Inoltre la stringa di formato della 
linea dev'essere racchiusa fra virgolet¬ 
te oppure dev'essere assegnata a un 
stringa all'interno del programma pri¬ 
ma dell’esecuzione dell’istruzione 
&PRNTUSNG. I tentativi di conca¬ 
tenare stringhe in sexpr danno qual¬ 
che strano risultato. 

&PRNTUSNG può essere usato 
anche per scrivere dati sdì dischetto. 
Se questo fatto vi sembra inutile os¬ 
servate il programma e l'output visi¬ 
bili nell’esempio 1. 

Notate che i campi numerici sepa¬ 
rati sono stati scritti sul dischetto co¬ 


me un'unica stringa continua, con 
una sola istruzione PRINT alla fine 
della scrittura per segnare la fine del¬ 
la stringa. La stringa viene letta 
usando &INPT. &INPT non ignora 
gli spazi iniziali delle stringhe come 
fa INPUT nell'Applesoft. Questo fat¬ 
to è importante per tenere allineati i 
campi in modo che in seguito pos¬ 
sano essere separati dalla funzione 
MID$. Sono stati risparmiati cinque 
byte di spazio del dischetto, dato che 
non si ha un ritorno carrello dopo 
ogni voce di dati. La sola limitazio¬ 
ne di questo metodo è che non è pos¬ 
sibile scrivere più di 255 byte di fila 
e recuperarli con un unico input di 
stringa. 

Per vedere in modo più spettacola¬ 
re questi risparmi considerate un file 
di testo con una lunghezza di record 
di 256 byte. Se state salvando campi 
di una lunghezza massima di dicci 
caratteri potete salvare INT(256/(10 
+1)), ossia 23 campi per record. 
Usando il metodo &PRNTUSNG 
potete salvare INT((256-1)/10) ossia 
25 campi per record! 

Naturalmente se da un lato rispar¬ 
miate spazio nel file di testo dall'al¬ 
tro perdete spazio e tempo nel vo¬ 
stro programma, a causa di una più 
complessa routine di lettura/scrittura 
dei record. Perciò dovete decidere se 
valga la pena di fare questo baratto 
per la specifica applicazione. 

L’ultima voce è la routine di corre¬ 
zione dello stack. Inseritela nella vo¬ 
stra routine di gestione dell'errore. 
La sintassi è semplicemente: &FIX 

Questo comando ripristina il pun¬ 
tatore dello stack elaboratore al valo¬ 
re che aveva all’inizio dell'istruzione 
che ha prodotto l'errore. Esso conser¬ 
va cose come l'indirizzo di ritorno 
delle subroutine attive. 

Ciò permette al programmatore di 
fare il RÉSUMÉ a un'istruzione al¬ 
l’interno di una subroutine e di non 
trovarsi più tardi dinanzi a messaggi 
di RETURN WITHOUT GOSUB 
ERROR (errore di RETURN senza 
GOSUB). 

Possibili miglioramenti 
a Supercharger 

C'c spazio in abbondanza per 
espandere questo pacchetto. Le aree 
al disopra della utility e al disotto 
del DOS si prestano bene anche a ca¬ 
ricare ed eseguire programmi in codi¬ 
ce macchina che non debbano essere 
disponibili in ogni momento. 
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Scrivete qui tutti i problemi 

CHE IL VOSTRO PERSONAL COMPUTER DOVREBBE RISOLVERE. 


* Ms-Dos,® Xenix,® Unix® compatibile 




















Tutte le soluzioni le trovate qui 


GESTIONE CARTELLE CLINICHE 

GESTIONE STUDI COMMERCIALISTI 

TIMELINE® 

GESTIONE SCUOLE 

GESTIONE AMBULATORI MEDICI 

CHARTSTAR® 

GESTIONE DISTRIBUTORI 

DI BEVANDE 

AUTOMA® 

DIETOLOGIA 

GESTIONE ALLEVAMENTI 

GESTIONE MERCATI 
ORTOFRUTTICOLI 

D BASE III® 

MICROSOFT® 

MULTI PLAN® 

CALCOLO STRUTTURALE 

OLITALK® 

GESTIONE STUDI OCULISTICI 

GESTIONE CAMPEGGI 

GESTIONE CANTIERI EDILI 

OLITERM® 

SUPERWINDOW® 

CALCOLI MATEMATICI 

PROGETTAZIONE ARREDAMENTI 

REVISIONE ANALISI PREZZI 

GESTIONE CONDOMINI 

MODELLI MATEMATICI 
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ISOLAMENTO TERMICO EDIFICI 

CAPITOLATO DAPPALTO 

EASY GRAPHICS® 

PROGRAMMI DIDATTICI 

GESTIONE AZIENDALE INTEGRATA 

COSTI DI CANTIERE 

GESTIONE STUDI NOTARILI 

ANAGRAFE COMUNALE 

CONTABILITA GENERALE 

CONTABILITA’ CANTIERI 

MICROSOFT® 

MS-CHART 

ANAGRAFE ELETTORALE 

GESTIONE MAGAZZINO 

TECNICA DELLE FONDAZIONI 

FRAMEWORK® 

GESTIONE FINANZIARIA 

ENTI LOCALI 

EASY WRITER II® 

GESTIONE VENDITE 

GESTIONE VENDITE AL DETTAGLIO 

ANAGRAFE SCOLASTICA 

GESTIONE ORDINI 

WORDSTAR® 

SYMPHONY® 

EASY FILER® 

STATISTICHE 

MICROSOFT® 

MS-WORD 

SUPERCALC 3® 

GESTIONE NEGOZI OTTICI 

LOTUS 123® 

OLITEXT® 

GESTIONE VENDITE AL DETTAGLIO 
CON REGISTRATORI DI CASSA 

DELTA 4® 

GESTIONE VENDITE ALLINGROSSO 

EASY PLANNER® 

MICROSOFT® 

PROJECT 

GESTIONE BOUTIQUES 

RILEVAZIONI PRESENZE 

GESTIONE STUDI DENTISTICI 

AUTOCAD® - DISEGNO TECNICO 

MICROSOFT® 

R BASE 

DICHIARAZIONI REDDITI 

GESTIONE NEGOZI DI 
ABBIGLIAMENTO 

GESTIONE AGENTI DI 

COMMERCIO 



SOFTWARE OLIVETTI 

Un problema non è nient’altro che una soluzione non ancora trovata. Questo principio vale anche per i 
Personal Computer. Se volete che il vostro Personal, quale che sia la marca, dia risposte concrete ai vostri 
problemi, fatelo lavorare con il Software Olivetti. Olivetti ha selezionato e certificato il meglio dei più impor¬ 
tanti Produttori di software. In più ha prodotto direttamente un’altra serie di titoli di grande interesse. Fra tut¬ 
ti quésti c’è il software su misura per la vostra attività. Le Filiali Olivetti, i Concessionari e i Rivenditori Auto¬ 
rizzati sono a disposizione del vostro Personal per aiutarlo a trovare la soluzione non ancora trovata. 
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Chi desidera aggiungere altri co¬ 
mandi al pacchetto (il miglior modo 
per farlo è usando un assembler) non 
ha che da inserire la parola del co¬ 
mando nella tavola di scomposizio¬ 
ne (parse table) con il bit alto a uno 
ncH'ultimo carattere della parola. 
Immediatamente dopo la parola met- 


Questo programma in Applesoft ri¬ 
duce considerevolmente il numero 
dei settori del dischetto necessari per 
immagazzinare un'immagine in alta 
risoluzione. Per esempio una pagina 
d'intestazione con una piccola imma¬ 
gine Hi-Res al centro circondata da 
un testo impiegherebbe normalmen¬ 
te 33 o 34 settori. Con Hi-Res Crun- 
ch Decrunch potrebbe essere com¬ 
pressa in un file binario lungo appe¬ 
na cinque settori. 

Per comprendere come è immagaz¬ 
zinata un’immagine eseguite un qual¬ 
siasi programma che utilizzi la grafi¬ 
ca Hi-Res. Quando volete salvare la 
videata premete <RESET>. Adesso 
guardate se il programma usa HGR 
per visualizzare la pagina 1 dell'alta 
risoluzione o HGR2 per visualizzare 
la pagina 2 (se il programma lo ave¬ 
te scritto voi la cosa dovrebbe essere 
facile). Se il programma usa HGR 
l’indirizzo iniziale è $2000 (8192). 
Se usa HGR2 l’indirizzo è $4000 
(163 84). Questo determ inerà l'indiriz¬ 
zo che userete nel comando BSAVE. 
Inserite un dischetto che abbia alme¬ 
no 34 settori liberi (o 17 blocchi li¬ 
beri in ProDOS) e battete: 

BS AVEPICTURE,Aindirizzo inizia¬ 
le, L$2000 

Non preoccupatevi del fatto che 
non riuscite a vedere l’immagine. E' 
ancora in memoria. 

Come viene salvata 
l'immagine 

Richiamare un’immagine salvata è 
semplice. Battete HGR per visualiz¬ 
zare lo schermo della grafica Hi-Res, 
battete POKE-16302,0 per accedere 
al modo tutta grafica, e fate BLOAD 
nome del file,A$2000. Il parametro 
d'indirizzo, A$2000, assicura che 
l’immagine sia caricata nella pagina 
1. Vedrete l’immagine che si materia¬ 
lizza lentamente sullo schermo in 
maniera strana: non cominccrà dal¬ 
l’alto venendo in giù, ma comparirà 


tete l'indirizzo del punto d'ingresso 
per il comando, con il byte d'ordine 
basso dell’indirizzo per primo. A cau¬ 
sa della struttura dell’interprete la ta¬ 
vola di scomposizione è limitata a 
256 byte. Dato che è lungo solo 96 
byte c'è spazio in abbondanza per l'e¬ 
spansione. 


con l’effetto apparente di una tenda 
veneziana. 

Notate che, per quanto complessa 
possa essere, l'immagine occupa 
sempre 34 settori del dischetto. 
Un’immagine di un solo puntino oc¬ 
cupa esattamente lo stesso spazio di 
un'immagine molto complicata. 

Crunch Decrunch riduce le dimen¬ 
sioni della vostra immagine di un'en¬ 
tità che può essere anche di 30 setto¬ 
ri. Il trucco consiste nell’indicare i 
byte zero come gruppi anziché come 
singoli zeri. Se avete sei byte zero 
di fila, anziché essere salvati come 
00 00 00 00 00 00 saranno salvati 
come 00 06. 

L'unico svantaggio è che quando 
uno zero è solo occuperà un byte in 
più. Per questo motivo può darsi 
che qualche file occupi quando' è 
compresso più settori della versione 
non compressa. Ma è una circostan¬ 
za rara, e se si verifica il programma 
ve ne avvertirà. 

Come si usa 
il programma 

Per usare Crunch Decrunch basta 
fare RUN PIC.COMPRESSOR. 
Quando il file binario è stato carica¬ 
to con BLOAD premete la barra spa¬ 
zio. Il programma dirà: 


SCRIVI IL NOME DELL’IMMAGI¬ 
NE, 1 PER PAGINA 1, 2 PER PA¬ 
GINA 2, O ? PER CATALOG 
FELE-> 


Questo è l'invito a battere il nome 
del file che avete salvato. Se l'imma¬ 
gine è in memoria e non è stata sal¬ 
vata su dischetto battete 1 per la pa¬ 
gina 1 della memoria Hi-Res (HGR) 
o 2 per la pagina 2 della memoria 
Hi-Res (HGR2). Se non siete sicuri 
del nome del file battete ? per visua¬ 
lizzare il catalog del dischetto. Quan¬ 
do avrete battuto il nome del file ve¬ 


drete il messaggio STO CARICAN¬ 
DO L’IMMAGINE... 

L’immagine sarà caricata nella pa¬ 
gina 1 (HGR) della memoria. Quan¬ 
do il BLOAD è finito siete invitati 
a premere un tasto qualunque. L'im¬ 
magine viene visualizzatale il com¬ 
puter attende che premiate un altro 
tasto. 

Adesso comincia la compressione. 
Quando l’operazione numerica è fini¬ 
ta il programma chiede il nome del 
file con cui salverete l'immagine 
compressa. Battendo il punto (.) si 
annulla il salvataggio. Se premete 
<RETURN> la vecchia immagine 
viene eliminata (DELETE) e la nuo¬ 
va immagine viene salvata con il 
vecchio nome. Vi viene chiesto di 
confermare che volete questa sostitu¬ 
zione. (Se il vecchio file non fosse 
eliminato l'immagine occuperebbe 
ancora, per una singolarità del DOS, 
34 settori.) 

A questo punto potete nuovamen¬ 
te battere un 1 o un 2, per cambiare 
la pagina che l'immagine occuperà 
in seguito quando se ne farà il 
BRUN. Il valore di default è 1, a me¬ 
no che l’immagine non sia stata pre¬ 
sa in origine dalla pagina 2. 

Se accade qualche errore il control¬ 
lo del programma passa alla routine 
di gestione degli errori. Se si verifi¬ 
ca un errore con il dischetto la routi¬ 
ne riavvia il programma. Qualsiasi 
altro errore causerà l’arresto del pro¬ 
gramma. Un'immagine che è stata 
compressa viene salvata sul dischet¬ 
to in un file comprendente un breve 
programma in linguaggio macchina 
che la decomprimerà. Per visualizza¬ 
re un’immagine compressa basterà 
eseguire con l'istruzione BRUN il fi¬ 
le deH’immagine compressa mentre 
è visualizzata l'appropriata pagina 
della grafica Hi-Res. La routine che 
decomprime un'immagine comincia 
alla locazione $6039, e i dati dell’im¬ 
magine compressa vengono imme¬ 
diatamente dopo. Immagini diverse 
saranno compresse in dimensioni di¬ 
verse, e quindi se usate la memoria 
al di sopra di $6039 assicuratevi di 
essere oltre la fine dei dati relativi al¬ 
l’immagine. 


Queste due utility sono 
disponibili su dischetto. 
L’elenco, i prezzi e le modalità 
d’ordine di questo e degli altri 
dischetti disponibili sono 
riportati nella rubrica 
Disk Service. 


Crunch Decrunch 
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By Nibble e Applicando 






Per iniziativa di Applicando ecco anche in Italia il software distribuito 
praticamente gratis che negli Usa sta avendo enorme successo. E' una 
miniera di programmi di ogni tipo, di routine, di utility, di giochi. Chi lo riceve 
decide, dopo averlo provato a casa sua, se mandare o no i pochi dollari 
che gli autori richiedono in cambio del diritto di farne uso. 

Arriva 

il FreeSoftware 


"Duplicate pure questo programma 
e distribuitelo agli amici. Se però lo 
usate, per favore mandatemi dieci 
dollari..." E’ questa grosso modo la 
filosofìa del FreeSoftware: il softwa¬ 
re libero. Negli Stati Uniti sta aven¬ 
do una diffusione tremenda: tutti lo 
copiano e lo distribuiscono agli ami¬ 
ci. Che tutti mandino i dieci, quindi¬ 
ci o venti dollari richiesti, è invece 


da vedere. Ma gli autori non si la¬ 
mentano: "Denaro ne arriva," dico¬ 
no. E aggiungono: "La gente è mol¬ 
to più onesta di quello che sembri: 
gli utenti di programmi hanno capi¬ 
to che questa è una formula intelli¬ 
gente e da incoraggiare." 

Dice un autore che, distribuendo 
anche dell'altro suo software attraver¬ 
so una casa ben nota preferisce man¬ 


tenere l'incognito: "Il mio editore di 
software mi riconosce il 10%: su un 
pacchetto in vendita a 250 dollari 
questa percentuale è pari a 25 dolla¬ 
ri. Non può essere diversamente per¬ 
chè l'editore deve sobbarcarsi i costi 
dei manuali, del package, del magaz¬ 
zino, della distribuzione, della pub¬ 
blicità. Ma i manuali, soprattutto 
per il Macintosh, non sono realmen- 
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te necessari. Il package può essere 
anche stupendo ma in realtà non ag¬ 
giunge nulla al programma, che se è 
valido vale anche senza scatola. Il 
magazzino con la formula del Free 
software proprio non esiste. E quan¬ 
to alla pubblicità ne fa di più il fatto 
che il programma circoli liberamen¬ 
te; e non costa nulla. Risultato: chie¬ 
do direttamente 25 dollari a chi, a- 
vendo provato il mio programma li¬ 
beramente a casa sua, decide di tener¬ 
selo. E guadagno di più con il Free 
software che con il mio editore..." 

L’autore dunque guadagna lo stes¬ 
so denaro, se non di più. L’utente 
paga solo un decimo di quel che gli 
costerebbe lo stesso programma, e 
dopo averlo provato. Tutti contenti, 
allora, a parte gli editori di software? 
Sì e no. In Italia, per esempio, quan¬ 
ti saranno coloro che in buona fede, 
ricevuto il dischetto e provato il pro¬ 
gramma, cancelleranno ciò che non 


intendono trattenere e pagare? Per ca¬ 
rità, non si vuol certo suggerire che 
gli italiani siano meno seri e onesti 
degli americani. Ma se nessun auto¬ 
re italiano ci ha ancora provato, due 
son le possibilità: o mancano gli 
autori (che invece ci sono), o manca 
la Fiducia. 

Applicando ha deciso però che può 
valer la pena di tentare, e gli autori i- 
taliani, una volta istituito il canale, 
se lo riterranno opportuno, salteran¬ 
no fuori. Così, per cominciare, ecco 
dodici dischetti ITeeSoftadisposizio- 
ne dei lettori. Contengono software 
americano non tradotto, spesso vali¬ 
dissimo, quasi sempre completo di i- 
struzioni per l'uso. Tanto per citare 
qualcosa: il FreeTerm 1.8, che è un 
programmadi comunicazione stupen¬ 
do (APFS/1), al Red Ryder 9.0 
(APFS/2) sempre di comunicazione 
ma addirittura iperprofessionale. Dai 
programmi per l'apprendimento e la 


scuola (esempio: Drill, APFS/4), ai 
giochi tipo guerre spaziali dei di¬ 
schetti APFS/5 e APFS/8 (splendi¬ 
do in quest'ultimo il gioco d’abilità 
e d'intelligenza Reversi). I dischetti 
6 e 7 sono invece specializzati rispet¬ 
tivamente in applicazioni FileVi- 
sion e Excel (e Multiplan), per cui 
occorrepossederequestidueprogram- 
mi per poterli usare. 

Spiegare programma per program¬ 
ma tutto il contenuto di questi dodi¬ 
ci dischetti è impossibile: c'è il cele¬ 
bre Eliza (APFS/4), dove il compu¬ 
ter vi psicanalizza rispondendo inte¬ 
rattivamente a qualsiasi vostra do¬ 
manda (il che è anche uno splendido 
esercizio d'inglese), e ci sono addirit¬ 
tura tre dischetti specializzati in 
Fonts (APFS/9-10-11), i caratteri al¬ 
ternativi per il vostro Macintosh. E 
c'è anche il DiskCat (APFS/1), il 
creatore di catalogo dei dischetti con 
il quale è stato preparato automatica- 
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363K su disco 


26K disponibili 


Open me first 




California Land Cruise Eye Elements 

jjjj&jà 


□ □ 

Olyrnpics Reai Estate 

n 


Births Recipes Disk Cataloq Calendar Calendar Doc. 

Ski ^lope Escher Vip^out The Visitor Piano 






In queste pagine, alcune icone di FreeSoft, tra cui: 

1) MacWait, Billiard Parlour, Fractal Contours, Aqua- 
rlum. 2) Red Ryder, Tree. 3) MacRepair, Iconmaker, 
PepsiCaps. 4) Slide Show, Eliza, StarMap. 5) Space 
War!, Invaders, Engel's Enigma. 6) The Visitor, Ca- 
lendar, Land Cruise, Eye, Olyrnpics. 7) Airways 
Chart, Mammoth, Locomotive, SmoothPics, Mouse- 
Ball. 9) Bubbles, Music Fonts, Ravenna, Calli- 
graphy, Centura, Sparta, Troyes, Demographics, Pa¬ 
lo Alto, Camelot. 11) Princeton, Long Island, East 
Orange. 12) Curves, Very New Fonts. 
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9 elementi 375K su disco 16K disponibili 
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I. Airways Files 2. Telcon files 


D 

3. Personal Reai Estate files 


O 


□ 

5. Squire Park Tower files 


□ 

6. Mammoth, Ine. files 


iCDs 1. Rirways Files 
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ED 
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2 elementi 

375K su disco IbKdispo 

! 
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o 

Airways 

Airways Chart 
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MultiPlanStuff 
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1984 Taxes 
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Taxes 
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10 elementi 360K su disco 



Concentration Concentration Folder 



Reversi Reversi Folder 



hangman Hangman Folder 

Smooth Voice Smooth Talker Folder 

<g 


31K disponibili 



Altered Finder 
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6 elementi 


367K su disco 


24K disponibili 
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FontDisplay FontDispUy.doc nswer keykaps Graphic Fonts 

□ □ 


Picture Fonts Special F'urpose Fonts 
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7 elementi 


SbOK su disco 


1 1K disponibili 


□ □ 


D 


Math Fonts Teohnical Fonts Language Fonts Text Fonts 
TTK 


FontDisplay FontDisplay.doc newer keykaps 


rv 
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8 elementi 


3b2K su disco 


29K disponibili 
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—'\7 - ^ Font Editor Resource Mover 

Font Lister Font Mover Font Doubler Set File Attributes 


□ D 

Tutonal Fon , s 
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12 elementi 


525K su disco 


66K disponibili 


D 

■A- 


lauri-, 


o 

Le Conjugueur yapun 3.0 COMPACT Curves 


(X) 

€r 


\ 

S i m □ tr e e C OR V BUS 

OPENME 


A 


Smile Meltdovn Antitheft Icori Venn 


card bic Very New Fonts 


<5 


0 


o 
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mente il contenuto di tutti e dodici i 
dischetti che correda quest'articolo, e- 
lencando per ogni dischetto i files 
contenuti e la sigla del tipo di file (e- 
sempio: FNDR per finder, APPL 
per applicazione, TEXT per testo), e 
del generatore (esempio: XCEL per 
Excel, TELO per FileVision, MA- 
CA, RPM*, ecc.). 9 ueste di¬ 
ranno di più a chi si intende anche di 
programmazione che all'utente nor¬ 
male, ma visto che l’informazione 
viene fornita direttamente dal pro¬ 
gramma DiskCat, perchè non darla? 

Dunque, questa miniera di pro¬ 
grammi è disponibile liberamente: 
abbiamo chiarito le regole del gioco. 
Ciascun programma contiene l'indi¬ 
rizzo al quale spedire le piccole cifre 
richieste a titolo di donazione dagli 
autori se si intende conservarlo e u- 
sarlo (ma ci sono anche programmi 
per l’uso dei quali non è richiesto 
proprio nulla, come per esempio l’ot¬ 
timo Billiard parlour, un perfetto 
gioco del biliardo sullo schermo). 
Applicando tuttavia, pur non inten¬ 
dendo guadagnare su questa operazio¬ 
ne, deve coprire le spese di dischetti, 
duplicazione, manipolazione e spe¬ 
dizione a tutti coloro che ne faranno 
richiesta. Abbiamo allora pensato di 
offrire questi dodici dischetti a grup¬ 
pi di cinque o di dodici per volta, al 
prezzo rispettivamente di 15 mila o 
di 10 mila l’uno (che come si vede 
coprono solo i costi vivi). In pratica 
chi ne ordinerà cinque a sua scelta pa¬ 
gherà 75 mila lire comprese Iva e 
spese di spedizione, pari a 15 mila li¬ 
re per dischetto, mentre chi li ordine¬ 
rà tutti e dodici pagherà 120 mila li¬ 
re (sempre Iva e spedizione compre¬ 
se), e cioè 10 mila lire l'uno. Negli 
Stati Uniti analoghi servizi di distri¬ 
buzione richiedono 9 dollari a di¬ 
schetto, che al cambio attuale fa cir¬ 
ca 15 mila lire. Chi invece volesse 
proprio e soltanto un singolo di¬ 
schetto dovrà pagarlo 30.000: per 
motivi organizzativi e amministrati¬ 
vi non ci è infatti possibile scendere 
al di sotLo di questa cifra. Per le ordi¬ 
nazioni si può usare il tagliando del 
DiskScrvice, pubblicato sullultima 
pagina del giornale, specificando le 
sigle dei dischetti richiesti. 


Tutti i programmi FreeSoftware 
sono disponibili su dischetto. 
L’elenco, i prezzi e le modalità 
d’ordine di questo e degli altri 
dischi disponibili sono riportati 
nella rubrica Disk Service. 
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SUPER 




PER II, Ile, Ile 
MACINTOSH 



Il Basic egli Apple II in pratica. Questo volume 
accompagna gradualmente l’utente, al quale 
non è richiesta alcuna conoscenza matematica 
o informatica di base, dai primi approcci alla 
tastiera fino alla completa padronanza del com¬ 
puter e della programmazione. È il lettore a 
decidere se passare al successivo capitolo o 
ritornare ad approfondire quanto gli è stato 
appena spiegato. 310 pagine, 28.000 lire. 



Il Multiplan per il Macintosh. Oltre la pura 
semplice descrizione del funzionamento del fo¬ 
glio elettronico, introduce l’utente all’uso di 
uno strumento di lavoro integrato che permette 
di svolgere una quantità insospettabile di attivi¬ 
tà diverse in ogni area del lavoro d’ufficio o nella 
professione: modifiche, tagli, spostamenti, ri¬ 
montaggi, dal bilancio di una società al campio¬ 
nato di calcio. 210 pagine, 26.000 lire. 



Il manuale ProDOS. Il ProDOS costituisce un 
significativo passo avanti rispetto al diffuso ma 
ormai un po’ invecchiato DOS 3.3. Questo ma¬ 
nuale introduce ai numerosi e complessi aspetti 
del ProDOS, dedicando particolare attenzione 
alla struttura ad albero dei directory, alla com¬ 
patibilità con il DOS 3.3 e con il SOS e alla 
programmazione in Basic Applesoft sotto Pro¬ 
DOS. 200 pagine, 25.000 lire. 



Il Basic Microsoft. Il libro comprende un’anali¬ 
tica descrizione dell’uso di tutte le istruzioni, 
funzioni, comandi e operatori, organizzata in un 
vero e proprio corso di programmazione: loop, 
array, gestione di stringhe, formattazione del¬ 
l’output, subroutine, debugging, uso dei me¬ 
nu, gestione dei file ad accesso casuale e se¬ 
quenziale, file di chiavi e puntatori. Ricchissima 
documentazione esemplificativa. 432 pagine, 
38.000 lire. 



Genitori nell’era del computer.ln che modo è 
possibile servirsi del computer nell’educazione 
dei figli? In che misura il computer cambierà la 
scuola? Qual è il software più adatto a stimolare 
la creatività dei bambini? A queste domande - e 
ad altre ancora - Pter Scharf dà delle risposte 
basate sulla sua esperienza in famiglia (quattro 
figli maniaci del computer) e nelle scuole statu¬ 
nitensi. 256 pagine, lire 19.000. 


COMPUTER 

GRAPHICS 

CORSO DI 
PROGRAMMAZIONE 
STEVEN HARRINGTON 



McGraw-Hill 


Computer Graphics. L’approccio seguito da 
Harrington rende accessibile il libro a un pubbli¬ 
co con basi matematiche elementari e concate¬ 
nando la spiegazione dei vari algoritmi in modo 
da portare il lettore anche alla realizzazione di 
un package grafico ben costruito e basato su 
concetti di standardizzazione delle funzioni. 
520 pagine, 39.000 lire. 


PASCAL 

GUIDA PER 


PROGRAMMATORI 
OLIVIER LECARME 
JEAN-LOUIS NEBUT 



McGraw-Hill 


Pascal. Guida per programmatori. Il libro può 
essere usato per un corso intermedio da coloro 
che scrivono programmi più avanzati, ma il suo 
fine principale è quello di servire come libro di 
testo per l’autoapprendimento, poiché esso of¬ 
fre una trattazione esauriente del Pascal e una 
descrizione fedele e precisa del linguaggio stan¬ 
dardizzato dall’ISO e dagli isituti nazionali di 
standardizzazione. 292 pagine, 29.000 lire. 











Programmazione umanizzata in Applesoft. 

Riassume tutte le tecniche che vengono comu¬ 
nemente impiegate dagli esperti di software per 
rendere più amichevoli i programmi. Vengono 
infatti affrontati tutti gli aspetti di queste tecni¬ 
che: sia quelli intèrni al software, come routine 
a prova d’errore o di formattazione dell’input, 
sia quelli esterni, come la documentazione e i 
manuali operativi. Il libro include un quiz mne¬ 
monico e un’agenda telefonica. 208 pagine, 
21.000 lire. 



Grafica e animazione con gli Apple //. Questo 
libro vuole guidare gli appassionati nella com¬ 
plessa materia della grafica e dell’animazione, 
prendendoli per mano dai primi rudimenti attra¬ 
verso numerosi esempi e applicazioni, fino a 
una completa comprensione dei principi e dei 
metodi della computer graphics. Gli esempi 
sono applicati alla famigla degli Apple//: Il Plus, 
//e e //c. 160 pagine, 17.000 lire. 



Il Basic Applesoft. In 16 capitoli, un metodo 
graduale che non presuppone alcuna cono¬ 
scenza di base. Tra gli argomenti trattati: uso 
interattivo del computer, sintassi dei comandi 
DOS, formattazione dell’input e dell’output, ar- 
ray, selezione e ordinamento dei dati, grafica a 
bassa e ad alta risoluzione, trattamento dei file 
su disco, debugging, riepilogo delle istruzioni, 
comandi e funzioni Applesoft. 232 pagine, 
19.000 lire. 



Guida al Macintosh. Fin dal primo approccio, il 
Mac è molto amichevole, e offre sul video una 
scelta tra varie opzioni, rappresentate da icone. 
In questo modo l’utente può scegliere una o più 
di queste funzioni potendo tranquillamente 
ignorare ciò che avviene aH’interno della mac¬ 
china e superando così la naturale diffidenza 
che a volte i computer ispirano. Lo strumento 
fondamentale per questo rapporto amichevole 
con il Mac è il mouse. 224 pagine, 22.000 lire. 


Il manuale MC68000. La famiglia di questo 
microprocessore trova un utilizzo vastissimo in 
workstation, sistemi CAD/CAM, sistemi di 
commutazione telematici, robot e controllori di 
processo, oltre che nei microcomputer di re¬ 
cente realizzazione, come Macintosh, Sinclair 
QL, HP 9816. Questo manuale è una preziosa 
fonte di informazione per gli appassionati che 
vogliono cimentarsi con la programmazione in 
Assembler. 168 pagine, 16.000 lire. 


Come usare MacWrìte e MacPaint. Molto più 
di quanto facciano i manuali operativi allegati ai 
programmi, questo volume svela ogni trucco 
dei due applicativi per Macintosh, spiegando ed 
esemplificando particolari tecniche di disegno e 
di gestione dei testi, sempre nell’ottica di un 
uso integrato dei due programmi. Il libro è 
riccamente illustrato con immagini prodotte se¬ 
guendo fedelmente i consigli del testo, così da 
offrire ai lettori il risultato grafico di ogni se¬ 
quenza di operazioni. 192 pagine, 20.000 lire. 
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UTILITY 


One - liners 


Questo simpatico oneliner, di Ra- 
venda Paolo (Bologna) serve per gio¬ 
care un temo al Lotto. Ogni volta 
che date il RUN il video visualizza 
tre numeri in modo casuale e sempre 
diversi. 


10 A = 

INT 

( RND 

(1) 

* 

90 

+ 

1) : 

B 

= 

INT 

( RND 

(1) 

* 

90 

+ 

1) : 

C 

= 

INT 

( RND 

(1) 

* 

90 

+ 

1) : 


IF 

A < 

> B AND B 

< 

> C 

AND 


A < 

> C 

THEN 

PRINT 

A, 

B 

, C : I 

F 

(A 

= B) 

OR (B 

= 

C) 

OR 

(A=C) 


THEN GOTO 10 








Eccovi un semplice oneliner, di 
Giovanna Criscuolo (Salerno), con 
il quale potrete misurarvi ai dadi 
con il vostro Apple. Attenzione: 
non è facile vincere! 


1 FOR A = 1 TO 4 :Q(A) = INT (6 * 
RND (1) + 1): NEXT:PRINT "TIRA 
IL PRIMO DADO":GET A$:PRINT " 
HAI FATTO"Q(1),"APPLE HA FATTO 
"Q (2) :PRINT"TIRA L'ALTRO DADO": 
GET A$:PRINT "HAI FATTO "Q(3)," 
APPLE HA FATTO "Q(4):IF Q(1) + 

Q (3) > Q (2) + Q(4) THEN INVERSE 
: PRINT "EVVIVA!": FLASH :PRINT 
"HAI VINTO" 


Da Maurizio Francesco di Roma 
giunge un oneliner che realizza isto¬ 
grammi tridimensionali. Risponden¬ 
do all’input con le due coordinate del 
piano orientato a 45 gradi, e con il 
valore relativo al punto corrisponden¬ 
te (ultimo dato), si avrà la sua visua¬ 
lizzazione tramite una colonnina che 
comparirà nel punto indicato. Que¬ 
sto programma di una sola linea, 
con qualche piccola modifica, può 
anche essere usato per realizzare dise¬ 
gni di assonometria cavaliera, o per 
visualizzare in tridimensione funzio¬ 
ni a tre variabili. 


10 HOME : 

: HCOLOR* 3: 

VTAB 22 :HGR: 

HPLOT 

0,159 TO 159 

,159: HPLOT 

0,159 

TO 56.2,159 

- 56.2: FOR 

K * 0 

TO 1 STEP 0: 

INPUT G,T,V: 

FOR F 

* 0 TO V:Y * 

F: Z =G:X = 

T : B = 

X :X = .7071067*Z / 2 :Y= 

X + Y: 

:X = X + B:HPLOT X,159 - 

Y: NEXT F,K 



Questo breve oneliner, ideato da 
Matteo Mazzi di Verona, facilita l’in- 
serimcnto della data e dell’ora con il 
sistema operativo ProDos. Dato il 
RUN si inseriscono il giorno (1- 
31), il mese (1-12), l'anno (ultime 
due cifre), l’ora (0-23) e i minuti (0- 


59). Funziona solo in ProDos. 

10 HOME : HCOLOR= 3:VTAB 22:HGR: 
HPLOT 0,159 TO 159,159: HPLOT 
0,159 TO 56.2,159 - 56.2: FOR 
K = 0 TO 1 STEP 0:INPUT G,T,V 
:FOR F = 0 TO V:Y = F:Z = G:X 
= T:B = X:X =.7071067 * Z / 2 
:Y = X + Y: X = X + B:HPLOT X, 
159 - Y: NEXT F,K 

Da Paolo Rossi di Garlasco (PV) 
giunge questo oneliner. Disegna in 
alta risoluzione dei cerchi su un'ellis¬ 
se creando una piacevole figura. 


1 HGR2 : HCOLOR* 3: FOR A = 0 TO 

3.14 STEP 

3.15 / 25:X = 100 * 

SIN (A) + 

139:Y * 50 * COS (A 

+ 3.14) + 

95: FOR J = 0 TO 1:X 

= X - 2 * 

J * 100 * SIN (A): 

HPLOT X + 

30,Y:FOR 1*0 TO 6.4 

STEP .2: 

HPLOT TO X + 30 * 

COS (I),Y 
I, J, A 

+ 30 * SIN (I): NEXT 


Questo oneliner, di Gianluca Vene¬ 
ri (Verona) permette di visualizzare 
sul video grafici e disegni fatti in 
precedenza. Se si modifica l'istruzio¬ 
ne ”BLOAD"A$ in "BLOAD"A$”. 
PIX" è possibile vedere i grafici pro¬ 
dotti dal VISIPLOT. 


1 HOME : HTAB 5:PRINT "PROGRAMMA 
DI VISUALIZZAZIONE":VTAB5:INPUT 
"NOME DEL DISEGNO:";A$: PRINT 
CHRS (4)"BLOAD"A$:TEXT :X =PEEK 
(49232):X = PEEK (49239):X = 
PEEK (49234) :GET T$: TEXT : HOME 
: END 


Ancora un oneliner grafico in alta 
risoluzione, inviato da Alessandro 
Ciattoni di Pescara. Bastano pochi 
secondi per effettuare un disegno. 


10 HIMEM: 383 92 :FOR J=768 TO 774 : 
READ A:POKE J,A: NEXT J: DATA 
01,00,04,00,37,55,00:POKE 232, 
0: POKE 233,3:HGR2 :HCOLOR= 3: 
SCALE* 64:FOR K = 1 TO 80:ROT= 
K: DRAW 1 AT 130,100: NEXT K 


Con questo breve oneliner, creato 
da Roberto Mazzoni di Piacenza, po¬ 
trete calcolare i giorni trascorsi tra 
due date. Può essere utilizzato come 
subroutine in qualsiasi programma. 


10 F = 0:FOR 1=0 TO 1 :N =F:INPUT 
"GG,MM,ANNO";G,M,A:F = (365 * 
A + G + 31 * (M - 1)) - (INT 
(. 4 * M + 2.3) * (M > 2) ) + ( 
INT ((A - (M < 3)) / 4)) -INT 
(3 / 4 * (INT ((A - (M < 3)) 
/ 100 + 1))) : NEXT :PRINT N - 
F;"GG" 


Questo oneliner di Pierpaolo Za- 
morani (Ferrara) permette di scrive¬ 
re sullo schermo, in modo casuale, 
un numero di anagrammi desiderato 
di una parola data, di qualsiasi lun¬ 
ghezza. 


10 HOME : INPUT"PAROLA:"; SS : INPUT 
"QUANTI ANAGRAMMI?";NA:L=LEN 
(SS): DIM A$(L + 1): FOR V = 

1 TO NA: PRINT V")";: FOR K= 

1 TO L:A$(K)=MID$ (SS,K,1): 
NEXT : FOR J = L TO 1 STEP-1: 
X = INT ( RND (1) * J + 1) : 
PRINT A$(X); : FOR Q = X TO J: 
A$(Q) = A$(Q + 1):NEXT:NEXT : 
/ PRINT " "; :NEXT:GET R$: RUN 


Ideato da Michele Percich di Trie¬ 
ste, ecco un oneliner grafico dal pia¬ 
cevole effetto. 


10 HGR : POKE 

- 16302,0 

: HCOLOR* 

3:FOR X=0 TO 

800 STEP 

5: 

HPLOT 

SIN (X)* 5 + 

95, COS 

(X) 

* 95 

+ 95 TO COS 

(X) * 71 + 

71, 

SIN 

(X) *71+71: NEXT X 




Questo breve oneliner, realizzato 
da Romeo Maurizio di Augusta, per¬ 
mette di disegnare sulla pagina grafi¬ 
ca in bassa risoluzione con l'ausilio 
del Mouse. Basta posizionarsi sul pi¬ 
xel desiderato, con il cursore (grigio) 
e premere il bottone del mouse per 
avere un pixel bianco. Premendo il 
tasto Mela vuota insieme al bottone 
del mouse, avrete un pixel nero. Per 
uscire basta premere un tasto qual¬ 
siasi. Funziona sul Ile direttamente, 
mentre per il Ile occorre la scheda 
del mouse inserita nello Slot 4. Tra 
le virgolette alte della prima istruzio¬ 
ne PRINT occorre inserire un CTRL- 
A. 

Terminato il disegno, se volete 
salvarlo dovete uscire dal program¬ 
ma e scrivere BS AVE NOME DISE- 
GNO,A$400,L$400. Per rivederlo è 
sufficiente attivare a bassa risoluzio¬ 
ne con GR e fare BLOAD NOME 
DISEGNO. 


5 GR :PR# 4 :PRINT "":PR# 0:IN# 4 
: E = 49152: FOR B = 0 TO 1:C = 
SCRN(X,Y): COLOR* 5: PLOT X,Y: 
FOR A = 0 TO 9:NEXT : INPUT ""; 
P,Q,B:F = ABS (B): COLOR* C * 
(B > 2) + 15 * (B<3) * (PEEK 
(E + 97) < 128): PLOT X,Y:FOR 
A = 0 TO 9: NEXT :X = P/26:Y 
- Q / 26:B = - B: NEXT : IN# 0 
: PR# 4: PRINT CHR$(0): PR# 0: 
CALL 43089: POKE E + 16,0 
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Come fosse un Macintosh, l'Apple in ogni sua versione dispone 
adesso di vere finestre, che possono essere visualizzate, tolte, 
sovrapposte, aggiungendo funzionalità e fascino allo schermo. 

Finestre, 
che passione 


Non più una sola schermata: il 
video si anima e si complica, con¬ 
sentendo di affacciarsi su nuove e af¬ 
fascinanti prospettive. L’apertura del¬ 
le finestre permette infatti di creare 
schermate in miniatura per attirare 
l'attenzione dove occorre, oppure 
schermate virtuali che possono esse¬ 
re più grandi dell’effettivo display. 
Window Magic vi consente di ag¬ 
giungere facilmente le finestre a qual¬ 
siasi programma in Applesoft. 

Per creare Window Magic sono sta¬ 
te in sostanza riprogettate le routine 
di input/output (I/O) per lo schermo 
e la tastiera. Poi è stata scritta un’in¬ 
terfaccia con il Basic consistente in 
dieci comandi con l'ampersand (è que¬ 
sto il nome inglese, contrazione di 
and per se and , del simbolo commer¬ 
ciale &). Window Magic può essere 
usato per definire ben 255 finestre di 
qualsiasi dimensione. 

Per usare Window Magic basta in¬ 
serire l'istruzione BRUN WIN- 
DOW.MAGIC (listato 1) all’ini¬ 
zio di un programma in Applesoft e 
poi usare un set di dieci comandi am- 
persand (&) per definire le finestre, 
spostarle attorno sullo schermo, e di¬ 
sporre input e output dalfintcrno di 
una specifica finestra. Avete a dispo¬ 
sizione due programmi dimostrativi 
(listati 2 e 3) per poter vedere co¬ 
me si usano questi comandi. Nelle 
descrizioni qui sotto delle istruzioni 
ampersand notate che A, B, C, D ed 
E rappresentano numeri, variabili nu¬ 
meriche o espressioni, mentre A$ 
rappresenta una variabile stringa. 

Quando si usa per la prima volta 
WINDOW.MAGIC, viene automati¬ 


camente definita una finestra delle di¬ 
mensioni dello schermo. Questa fine¬ 
stra costituisce lo sfondo di tutte le 
altre finestre, e perciò non è lecito 
eliminarla o spostarla. Ogni finestra 


è numerata. La finestra di sfondo ha 
il numero 0. La prima finestra che 
definite ha il numero 1, la seconda il 
numero 2 e così via. Più grande è il 
numero della finestra più elevata è la 


DOS 3.3 

Pro DOS 

Apple Ile 
Apple Ile 


Window Magic. Listato 1 


SOURCE FILE: WINDOW.MAGIC.SOURCE 


0000 

0000 

0000 

0000 

0000 

0000 

1 

2 

3 

4 

5 

6 

* WINDOW.MAGIC 

* BY PAUL NICK 

* COPYRIGHT (C) 1986 

* BY APPLICANDO & 

* MICROSPARC, INC 


0000 

7 





0000 

8 

* 




0000 

9 

* TOOL 

KIT ASSEMBLER 


0000 

10 

* 





- NEXT OBJECT FILE NAME IS WINDOW.MAGIC 

8BE8 

11 


ORG 

S8BE8 


8BE8 

12 

* 




8BE8 

13 

* ZERO 

PAGE 

LOCATIONS 

8BE8 

14 

* 




0004 

15 

PTR 

EQU 

$04 


0006 

16 

PTR1 

EQU 

$06 


0008 

17 

PTR2 

EQU 

$08 


0017 

18 

CH 

EQU 

$17 


0018 

19 

CV 

EQU 

$18 

; 

0028 

20 

BASL 

EQU 

$28 


0032 

21 

INVFLG 

EQU 

$32 


003C 

22 

Al L 

EQU 

$3C 


003D 

23 

A1H 

EQU 

$3D 


003E 

24 

A2L 

EQU 

$3E 


003F 

25 

A2H 

EQU 

$3F 


0042 

26 

A4 L 

EQU 

$42 


0043 

27 

A4H 

EQU 

$43 


005E 

28 

INDEX 

EQU 

$5E 


006F 

29 

FRETOP 

EQU 

$6F 


0073 

30 

HIMEM 

EQU 

$73 


0085 

31 

FORPNT 

EQU 

$85 


00A1 

32 

FACLO 

EQU 

$A1 


00B1 

33 

CHRGET 

EQU 

$B1 


00B7 

34 

CHRGOT 

EQU 

$B7 


00B8 

35 

TXTPTR 

EQU 

$B8 


00FB 

36 

ZP 

EQU , 

t $FB 


8BE8 

37 

* 




0200 

38 

IN 

EQU 

$200 


03F5 

39 

AM?ER 

EQU 

$3F5 


cooo 

40 

KBD 

EQU 

$C000 


COIO 

41 

STROBE 

EQU 

$C010 


C01E 

42 

RDALTCHR EQU 

$C01E 


C01F 

43 

COL80REG EQU 

$C01F 


C054 

44 

PAGE1 

EQU 

$C054 


C055 

45 

PAGE2 

EQU 

$C055 



DOS 3.3 


Pro DOS 


Apple Ile 


Apple Ile 


PTR TO WINDOW DESCRIPTOR. 

PTR TO POSITION WITHIN WINDOW. 
PTR TO APPLESOFT STRING . 

CURSOR POSITION RELATIVE 
TO TOP OF SCREEN. 

SCREEN POINTER. 

VIDEO FLAG. 

WORKING VARIABLES . 

ALSO PARAMETERS 
FOR MONITOR 
MEMORY MOVE. 


GETS BYTt OF PROGRAM TEXT . 
PTR TO PROGRAM TEXT. 


INPUT BUFFER. 

AMPERSAND VECTOR. 

KEYBOARD. 

STROBE.- 

BIT S80EQUALT. SET IN USE 
BIT S80EQU80 COL. ON 
DISABLE PAGE 2 


ENABLE PAGE 2 


(Continua) 


83 























sua priorità. Questo significa che se 
due finestre si accavallano la finestra 
di priorità più bassa sarà parzialmen¬ 
te (o anche completamente) nascosta 
sotto quella di priorità più alta. Nota¬ 
te anche che ogni volta che si defini¬ 
sce un finestra essa viene attivata 
per il susseguente input/output co¬ 
me se si fosse effettuato un coman¬ 
do & ON. 

Tutti i comandi 
ampersand 

& DEF A,B>C,D,E - Questa 
istruzione viene usata per definire 
una finèstra. A e B sono rispettiva¬ 
mente le posizioni orizzontale e ver¬ 
ticale dell’angolo in alto a sinistra 
della finestra. Le fasce ammesse per 
A e B sono 0-255. E' perfettamente 
accettabile definire una finestra fuori 
schermo. La potrete trasferire sullo 
schermo in una fase successiva del 
vostro programma. C e D sono ri¬ 
spettivamente la larghezza e l'altezza 
della finestra. Le fasce di C e D so¬ 
no 3-96. Si può definire una finestra 
più grande dello schermo, però così 
si consuma memoria in più. E è il 
codice di schermo per il carattere che 
formerà il bordo della finestra. I codi¬ 
ci di schermo variano secondo il mo¬ 
dello di Apple, e dipendono dallo sta¬ 
to di attivazione o meno della scheda 
80 colonne. Per esempio per definire 
una finestra con un bordo fatto di 
spazi in inverse usate: 


& DEF A,B,C,D,32 


e se non volete nessun bordo lascia¬ 
te E=0. La fascia di E è 0-255. 

& ON A - Questo comando atti¬ 
va la finestra A per l’input/output. 
La finestra di sfondo è la finestra 0 e 
qualsiasi finestra da voi definita sarà 
numerata a partire da 1. Osservate 
che il programma tiene nota della po¬ 
sizione del cursore per ciascuna fine¬ 
stra, cosicché quando si attiva una fi¬ 
nestra il cursore si trova dov’era 
quando era stata disattivata. 

& DEL - Questo comando elimi¬ 
na la finestra che è attiva al presen¬ 
te. Sarà poi diminuito il numero 
d'ordine delle finestre superiori a que¬ 
sta. Per esempio se avete tre finestre 
ed eliminate la finestra 2, la finestra 
3 diventa finestra 2. La finestra cor¬ 
rente è ancora la numero 2. Se cerca¬ 
te di eliminare una finestra che non 
è stata definita ricevete un messag¬ 
gio di SYNTAX ERROR. 


8BE8 : 



46 

• 




8BE8 : 



47 

* APPLESOFT ROUTINES 


8BE8 : 



48 

* 




D410 : 



49 

MEMERR 

EQU 

SD410 

;OUT OF MEMORY ERROR. 

D539 : 



50 

GDBUFS 

EQU 

$D539 

;USED IN COLLECTING INPUT. 

DD67 : 



51 

FRMNUM 

EQU 

SDD67 

;EVALUATE NUMBER FORMULA 

DD6C : 



52 

CHKSTR 

EQU 

SDD6C 

;CHECKS FOR STRINO. 

DD7B: 



53 

FRMEVL 

EQU 

$DD7B 

; EVALUATE ANY FORMULA 

DEBE: 



54 

CHKCOM 

EQU 

SDEBE 

; CHECKS FOR COMMA. 

DEC9 : 



55 

SYNERR 

EQU 

$DEC9 

; SYNTAX ERROR. 

DFE3 : 



56 

PTRGET 

EQU 

SDFE3 

; GETS PTR TO VARIABLE . 

E199 : 



57 

RANGERR 

EQU 

SEI 99 

; ILLEGAL QUANTITY ERROR. 

E3E7 : 



58 

STRLIT 

EQU 

5E3E7 

; PREPARE STR FOR PRINTING 

E600 : 



59 

FREFAC 

EQU 

SE600 

;FREE STRING POINTER 

E6FB : 



60 

CONINT 

EQU 

SE6FB 

;CONVERT REAL TO INTEGER. 

ED34 : 



61 

FOUT 

EQU 

$ED34 

.-NUMBER TO STRING ROUTINE 

F273 : 



62 

SETNORM 

EQU 

SF273 

; NORMAL VIDEO 

F277: 



63 

INVERSE 

EQU 

$F2 77 

.•INVERSE VIDEO 

F280 : 



64 

FLASH 

EQU 

SF280 

; FLASHING VIDEO 

8BE8: 



65 

* 




8BE8 : 



66 

* MONITOR ROUTINES & 

LOCATIONS 

8BE8 : 



67 

* 




FBB3 : 



68 

IDBYTE 

EQU 

SFBB3 


FBCO : 



69 

IDBYTE2 

EQU 

SFBC0 


FBC1 : 



70 

BASCALC 

EQU 

$FBC 1 

;GETS SCREEN ADDRESS. 

FD6F : 



71 

GETLN 

EQU 

SFD6F 

;GETS LINE OF INPUT. 

FE2C : 



72 

MOVE 

EQU 

SFE2C 

.•MEMORY MOVE ROUTINE. 

8BE8 : 



73 

* 




8BE8 : 



74 

* SETUP 

ROUTINE (MAY 

BE OVERWRITTEN BY WINDOWS) 

8BE8 : 



75 

* 




8BE8: A9 

4C 


76 

SETUP 

LDA 

#$4C 

.-SET UP 

8BEA :8D 

F5 

03 

77 


STA 

AMPER 

.•AMPERSAND 

8BED:AD 

FC 

95 

78 


LDA 

MEMTOP 

;VECTOR. 

8BF0 : 8D 

F6 

03 

79 


STA 

AMPER+1 

.•RESET 

8BF3 : AD 

FD 

95 

80 


LDA 

MEMTOP +1 

.-HIMEM 

8BF6:8D 

F7 

03 

81 


STA 

AMPER+2 

.AND 

8BF9 : AD 

FE 

95 

82 


LDA 

MEMBOT 

; FRETOP . 

8BFC:85 

73 


83 


STA 

HIMEM 

;DEFINE 

8BFE:85 

6F 


84 


STA 

FRETOP 

; BACKGROUND 

8 C 0 0 : AD 

FF 

95 

85 


LDA 

MEMBOT +1 

; WINDOW 

8C03: 85 

74 


86 


STA 

HIMEMtl 

; BEFORE 

8C05: 85 

70 


87 


STA 

FRETOP +1 

; EXITING 

8C07:A2 

80 


88 


LDX 

#$80 


8C09 : AD 

B3 

FB 

89 


LDA 

IDBYTE 

;06EQUIIC/IIE 

8C0C : C9 

06 


90 


CMP 

#$06 


8C0E : DO 

20 


91 


BNE 

JMPOUT 


8C10 :8E 

EB 

95 

92 


STX 

IIC 


8C13 : AD 

CO 

FB 

93 


LDA 

IDBYTE2 

; E0EQUENH. HE, 00EQUIIC 

8C16 : 2 9 

0F 


94 


AND 

# $0F 

;EAEQUORIG. IIE 

8C18 : DO 

05 


95 


BNE 

CHECK80 


8C1A : A9 

CO 


96 


LDA 

#$C0 


8C1C:8D 

EB 

95 

97 


STA 

IIC 


8C1F:A9 

28 


98 

CHECK80 

LDA 

#$28 


8C21 :2C 

1F 

CO 

99 


BIT 

COL80REG 


8C24 : 10 

04 


100 


BPL 

STORCOL 


8C26 : 0A 



101 


ASL 

A 


8C27 :8E 

EA 

95 

102 


STX 

COL80 


8C2A:8D 

EC 

95 

103 

STORCOL 

STA 

NOCOLS 


8C2D:8D 

EF 

95 

104 


STA 

LENH 


8C30:4C 

AA 

8C 

105 

JMPOUT 

JMP 

DEFI 

;TO BASIC 

8C33 : 



106 

* 




8C33 : 



107 

* START 

OF MAIN PROGRAM 

8C33 : 



108 

* 




8C33:A2 

0A 


109 

START 

LDX 

#$0A 

; FIND CORRECT 

8C3 5 :DD 

40 

8C 

110 

WDFIND 

CMP 

WORDVALS 

,X ; APPLESOFT 

8C38:F0 

10 


111 


BEQ 

WDFOUND 

; TOKEN OR 

8C3A:CA 



112 


DEX 


.•PRODUCE 

8C3B:10 

F8 


113 


BPL 

WDFIND 

; SYNTAX 

8C3D:4C 

C9 

DE 

114 

GSYNERR 

JMP 

SYNERR 

;ERROR. 

8C40 :B8 

B4 

85 

115 

WORDVALS DFB 

$B8,$B4, 

$85,$97,$A2 ;NEW STATEMENT 

8C43:97 

A2 







8C4 5 : 96 

BA 

84 

116 


DFB 

$96,$BA, 

$84 , $AB, $AE .-TOKENS. 

8C48 : AB 

AE 







8C4A : 20 

B1 

00 

117 

WDFOUND 

JSR 

CHRGET 

; EAT UP A BYTE 

8C4D : 8A 



118 


TXA 


; GET ADDRESS 

8C4E:0A 



119 


ASL 

A 

; OF ROUTINE 

8C4F:AA 



120 


TAX 


; PUSH ON STACK 

8CS0:BD 

5A 

8C 

121 


LDA 

ADDLIST+ 

1,X ; AND RTS 

8C53 : 4 8 



122 


PHA 


;TO ROUTINE. 

8C54 : BD 

59 

8C 

123 


LDA 

ADDLIST, 

X 

8C57: 4 8 



124 


PHA 



8C58 : 60 



125 


RTS 



8C59 : 



126 

• 




8C59:6$ 

8C 


127 

ADDLIST 

DW 

DEF-1 

;ADDRESS 

8CSB : 01 

8D 


128 


DW 

ON-1 

.-LIST OF 

8C5D: 29 

8D 


129 


DW 

DEL-1 

;ROUTINES 

8C5F: 66 

8D 


130 


DW 

HOME-1 


8C61 : F9 

8D 


131 


DW 

VTAB-Ì 


8C63 : 1E 

8E 


132 


DW 

HTAB-1 


8C65 : 60 

«E 


133 


DW 

• PR'INT-1 


8C67 : AA 

8E 


134 


DW 

INPUT-1 



84 

















8C69:96 

92 


135 

DW 

GOTO-1 

8C6B:D4 

92 


136 

DW 

RESTORE-1 

8C6D : 



137 * 



8C6D: 20 

E8 

94 

138 DEF 

JSR 

SAVEPOS 

8C70:A2 

00 


139 

LDX 

#500 

8C72: 86 

3D 


140 

STX 

A1H 

8C74: 86 

3C 


141 

STX 

A1L 

8C76:CA 



142 

DEX 

/ 

8C77: 86 

3E 


143 

STX 

A2L 

8C79:20 

B9 

94 

144 

JSR 

GETNUMPR 

8C7C : 8D 

ED 

95 

145 

STA 

POSH 

8C7F: 20 

B9 

94 

146 

JSR 

GETNUMPR 

8C82 : 8D 

EE 

95 

147 

STA 

POSV 

8C85 :A2 

03 


148 

LDX 

♦ $03 

8C87 : 86 

3D 


149 

STX 

A1H 

8C89 :A2 

60 


150 

LDX 

#$60 

8C8B:86 

3E 


151 

STX 

A2L 

8C8D : 20 

B9 

94 

152 

JSR 

GETNUMPR 

8C90:8D 

EF 

95 

153 

STA 

LENH 

8C93: 20 

B9 

94 

154 

JSR 

GETNUMPR 

8C96:8D 

F0 

95 

155 

STA 

LENV 

8C99:A9 

01 


156 

LDA 

#1 

8C9B:85 

3C 


157 

STA 

Al L 

8C9D:A2 

00 


158 

LDX 

#$00 

8C9F:86 

3D 


159 

STX 

A1H 

8CA1 : CA 



160 

DEX 


8CA2: 86 

3E 


161 

STX 

A2L 

8CA4: 20 

B9 

94 

162 

JSR 

GETNUMPR 

8CA7:8D 

FI 

95 

163 

STA 

BORDER 

8CAA:AD 

F 4 

95 

164 DEFI 

LDA 

NUMWIND 

8CAD :8D 

F5 

95 

165 

STA 

CURWIND 

8CB0: 20 

D5 

93 

166 

JSR 

GWINADD 

8CB3: 38 



167 

SEC 


8CB4: AD 

FC 

95 

168 

LDA 

MEMTOP 

8CB7:E5 

04 


169 

SBC 

PTR 

8CB9:85 

3C 


170 

STA 

A1L 

8CBB:AD 

FD 

95 

171 

LDA 

MEMTOP+1 

8CBE:E5 

05 


172 

SBC 

PTR + 1 

8CC0: 85 

3D 


173 

STA 

A1H 

8CC2:A9 

09 


174 

LDA 

#$09 

8CC4: 85 

3E 


175 

STA 

A2L 

8CC6:A9 

00 


176 

LDA 

#$00 

8CC8: 85 

3F 


177 

STA 

A2H 

8CCA:AC 

F0 

95 

178 

LDY 

LENV 

8CCD: 18 



179 DADDLEN 

CLC 


8CCE:A5 

3E 


180 

LDA 

A2L 

8CD0:6D 

EF 

95 

181 

ADC 

LENH 

8CD3: 85 

3E 


182 

STA 

A2L 

8CD5: 90 

02 


183 

BCC 

DADDLEN1 

8CD7:E6 

3F 


184 

INC 

A2H 

8CD9:88 



185 DADDLEN1 DEY 


8CDA: DO 

FI 


186 

BNE 

DADDLEN 

8CDC:A5 

3F 


187 

LDA 

A2H 

8CDE:C 5 

3D 


188 

CMP 

AlH 

8CE0: 90 

0B 


189 

BCC 

DMEMYY 

8CE2:F0 

03 


190 

BEQ 

DMEMY 

8CE4: 4C 

10 

D4 

191 MEMOUT 

JMP 

MEMERR 

8CE7:A5 

3E 


192 DMEMY 

LDA 

A2L 

8CE9:C5 

3C 


193 

CMP 

Al L 

8CEB:B0 

F7 


194 

BCS 

MEMOUT 

8CED: A5 

3E 


195 DMEMYY 

LDA 

A2L 

8CEF: 91 

04 


196 

STA 

(PTR)/Y 

8CF1:C8 



197 

INY 


8CF2:A5 

3F 


198 

LDA 

A2H 

8CF4 : 91 

04 


199 

STA 

(PTR), Y 

8CF6: 20 

15 

93 

200 

JSR 

SAVEDESC 

8CF9:20 

00 

93 

201 

JSR 

POSICALC 

8CFC:EE 

F 4 

95 

202 

INC 

NUMWIND 

8CFF : 4C 

67 

8D 

203 

JMP 

HOME 

8D02 : 



204 * 



8D02 : 20 

E8 

94 

20 5 ON 

JSR 

SAVEPOS 

8D0 5 :A2 

01 


206 

LDX 

#$01 

8D07: 86 

3C 


207 

STX 

Al L 

8D09 :CA 



208 

DEX 


8D0A:86 

3D 


209 

STX 

AlH 

8D0C:AE 

F 4 

95 

210 

LDX 

NUMWIND 

8D0F:CA 



211 

DEX 


8D10 : 86 

3E 


212 

STX 

A2L 

8D12: 20 

B9 

94 

213 

JSR 

GETNUMPR 

8D15:8D 

F5 

95 

214 ON1 

STA 

CURWIND 

8D18 : 20 

D5 

93 

215 

JSR 

GWINADD 

8D1B : 20 

F 4 

92 

216 

JSR 

LOADDESC 

8D1E:A0 

07 


217 

LDY 

#$07 

8D20 :B1 

04 


218 

LDA 

(PTR), Y 

8D22: 85 

17 


219 

STA 

CH 

8D24:C8 



22 0 

INY 


8D25 :B1 

04 


221 

LDA 

(PTR),Y 

8D27 : 85 

18 


222 

STA 

CV 

8D2 9-.60 



223 

RTS 


8D2 A : 



224 * 



8D2A:AD 

F5 

95 

225 DEL 

LDA 

CURWIND 

8D2D: DO 

03 


226 

BNE 

DEL0 

8D2F:4C 

3D 

8C 

227 

JMP 

GSYNERR 

8D32:AS 

04 


228 DEL0 

LDA 

PTR 

8D34: 85 

42 


229 

STA 

A4 L 

8D36 :A5 

05 


230 

LDA 

PTR+1 

8D38: 85 

43 


231 

STA 

A4 H 

8D3A:AE 

F5 

95 

232 

LDX 

CURWIND 

8D3D:E8 



233 

INX 


8D3E: 20 

D8 

93 

234 

JSR 

GWINADD1 

8D41 : A5 

04 


235 

LDA 

PTR 

8D43 : 85 

3C 


236 

STA 

Al L 

8D45:A5 

05 


237 

LDA 

PTR + 1 


SAVE CURSOR POSITION. 
CALL GETNUMPR 
TO GET PARAMETERS. 


MAKE NEW WINDOW 
THE CURRENT WINDOW. 
GET PTR TO NEW WINDOW 
FIND HOW 
MUCH MEMORY 
IS LEFT. 


FIND HOW 

MUCH MEMORY 

NEW WINDOW NEEDS . 


SEE IF THERE 
IS ENOUGH 
MEMORY LEFT. 


SAVE THE MEMORY 
NEEDED BY THE 
WINDOW AS THE OFFSET 
TO THE NEXT WINDOW 
IN THE DESCRIPTOR. 

SAVE REST OF DESCRIPTOR. 
CALCULATE POS IH & POS1V. 

INCREMENT NUMBER OF WINDOWS. 
HOME NEW WINDOW AND EXIT. 

SAVE CURSOR POS. 

GET WINDOW 
TO BE OPENED. 


SAVE IT AS CURRENT WINDOW. 
GET WINDOW PTR. 

GET DESCRIPTOR. 

GET CURSOR POSITION. 


; EXIT 

; DON 1 T DELETE 
.WINDOW 0. 

;SET UP 
;PARAMETERS 
;FOR MEMORY 
; MOVE ROUTINE 
;TO ERASE THE 
.-CURRENT WINDOW. 


(Continua) 


& HOME ■ Questa istruzione 
pulisce la finestra attiva al momento 
e porta il cursore in posizione di par¬ 
tenza. 

& VTAB A ■ Questo comando 
fa la tabulazione verticale a una posi¬ 
zione relativa all'angolo in alto a si¬ 
nistra della finestra che è attiva al 
momento. Si verificherà un errore di 
ILLEG AL QU ANTIT Y se cercherete 
di fare VTAB oltre i limiti dell'attua¬ 
le finestra. 

& HTAB A - Questo comando 
fa la tabulazione orizzontale a una 
posizione relativa all'interno della fi¬ 
nestra in modo analogo a quello del¬ 
l'istruzione &>VTAB. Notate che 
l'impiego di un bordo riduce le di¬ 
mensioni effettive di una finestra di 
due in ciascuna dimensione, in quan¬ 
to la prima e l'ultima riga e la prima 
e l'ultima colonna della finestra so¬ 
no occupate dai caratteri del bordo. 
Sia & VTAB sia & HTAB ignorano 
le righe e le colonne del bordo. 

& PRINT - Questo comando 
funziona come una normale istruzio¬ 
ne PRINT, con la differenza che 
non vengono supportati TAB(x), 
SPC(x) e le virgole (usate per divide¬ 
re lo schermo in colonne di tabula¬ 
zione). Window Magic offre invece 
altri quattro comandi di stampa (in¬ 
corporati nell'istruzione PRINT) che 
vengono implementati allo stesso 
modo. 

Il segno di posizione "a" (@) ese¬ 
gue un ritorno carrello, permettendo 
la stampa di più linee con un'unica 
istruzione PRINT. I simboli #, $ e 
% impostano la visualizzazione dei 
caratteri rispettivamente su normale, 
inverse e lampeggiante. Alla fine di 
un'istruzione & PRINT, per impedi¬ 
re il ritorno carrello, è sempre valido 
il punto e virgola. 

Per esempio l'istruzione: 


& PRINT %"H"#"ELLO"@$"LAG- 
GIU"'; 


stampa H in video lampeggiante e il 
resto di HELLO in video normale. 
Poi fa un ritorno carrello e stampa 
''LAGGIÙ'" in inverse. Non fa un ri¬ 
torno carrello dopo aver stampato 
LAGGIÙ’ perché c'è il punto e virgo¬ 
la. 

Notate che nel Ile e nel Ile enance- 
ment potreste ottenere i caratteri del 
mouse al posto di certi caratteri in 
inverse. Inoltre il firmware a 80 co¬ 
lonne non supporta i caratteri lam¬ 
peggianti. 
















8D47: 85 

3D 


238 


STA 

A1H 


8E21 : 86 

3C 


342 


STX 

Al L 



8D4 9 :AE 

F 4 

95 

239 


LDX 

NUMWIND 


8E23 : 86 

3D 


343 


STX 

A1H 


1 

8D4C: 20 

D8 

93 

240 


JSR 

GWINADD1 


8E25 : AE 

EF 

95 

344 


LDX 

LENH 



8D4F.A5 

04 


241 


LDA 

PTR 


8E28 : AD 

FI 

95 

345 


LDA 

BORDER 



8D51: 85 

3E 


242 


STA 

A2L 


8E2B : F0 

02 


346 


BEQ 

HTAB1 



8D53:A5 

05 


243 


LDA 

PTR+1 


8E2D : CA 



347 


DEX 



) 

8D55 : 85 

3F 


244 


STA 

A2H 


8E2E : CA 



348 


DEX 




8D57:A0 

00 


245 


LDY 

#$00 


8E2F : 86 

3E 


349 

HTAB1 

STX 

A2L 



8D59: 20 

2C 

FE 

246 


JSR 

MOVE 

DO IT. 

8E31 : 20 

B9 

94 

350 


JSR 

GETNUMPR 



8D5C : CE 

F 4 

95 

247 


DEC 

NUMWIND 

DEC. NUMBER OF WINDOWS, 

8E34 : 4 8 



351 


PHA 




8D5F : 20 

F 4 

94 

248 


JSR 

FASTDUMP 

REDUMP SCREEN. 

8E35: 20 

4E 

93 

352 


JSR 

SHRINK 



8D62 : A9 

00 


249 


LDA 

#0 

TURN ON 

8E38 : 68 



353 


PLA 




8D64:4C 

15 

8D 

250 


JMP 

ON1 

WINDOW 0. 

8E39:18 



354 


CLC 




8D67 : 



251 

• 




8E3A : 6D 

ED 

95 

355 


ADC 

POSH 



8D67 : AE 

FO 

95 

252 

HOME 

LDX 

LENV 

FILL THE 

8E3D:85 

17 


356 


STA 

CH 



8D6A : 20 

14 

94 

253 


JSR 

GETMEMAD 

SCREEN WITH 

8E3F : C6 

17 


357 


DEC 

CH 



8D6D:A5 

06 


254 


LDA 

PTR1 

SPACES. 

8E41 : 4C 

60 

93 

358 


JMP 

EXPAND 



8D6F:85 

3C 


255 


STA 

Al L 


8E44 : 



359 

* 





8D71 :A5 

07 


256 


LDA 

PTR1+1 


8E44 : 20 

00 

E6 

360 

STRPRT 

JSR 

FREFAC 

PRINT STRING 


8D73 : 85 

3D 


257 


STA 

A1H 


8E4 7 : 8D 

F8 

95 

361 


STA 

SEMI 

IN LOOP 


8D75:A2 

00 


258 


LDX 

#0 


8E4A:A0 

00 


362 


LDY 

#$00 



8D77: 20 

14 

94 

259 


JSR 

GETMEMAD 


8E4C : EE 

F8 

95 

363 


INC 

SEMI 



8D7A:A4 

06 


260 


LDY 

PTR1 


8E4F : CE 

F8 

95 

364 

STRPRTL 

DEC 

SEMI 



8D7C:A9 

Ofi 


261 


LDA 

#0 


8E52:F0 

OD 


365 


BEQ 

PRINT 



8D7E:85 

V6 


262 


STA 

PTR1 


8E54 : 98 



366 


TYA 




8D80 : A9 

AO 


263 


LDA 

# $A0 


8E55: 4 8 



367 


PHA 




8D82: 91 

06 


264 

HLOOP 

STA 

(PTR1),Y 


8E56:B1 

5E 


368 


LDA 

(INDEX),Y 



8D84 : C8 



265 


INY 



8 E 5 8 : 2 0 

DB 

92 

369 


JSR 

COUT 



8D85 : DO 

02 


266 


BNE 

HLOOP1 


8E5B:68 



370 


PLA 




8D87 :E6 

07 


267 


INC 

PTR1+1 


8E5C:A8 



371 


TAY 




8D89 :C4 

3C 


268 

HLOOP1 

CPY 

A1 L 


8E5D : C8 



372 


INY 




8D8B : DO 

F5 


269 


BNE 

HLOOP 


8E5E:4C 

4F 

8E 

373 


JMP 

STRPRTL 



8D8D : A6 

07 


270 


LDX 

PTR1+1 


8E61: 20 

B7 

00 

374 

PRINT 

JSR 

CHRGOT 

;GET LAST CHAR 


8D8F : E4 

3D 


271 


CPX 

A1H 


8E64 : F0 

3B 


375 

PRINT1 

BEQ 

PRTCR 

: END OF LINE? EXIT AFTER CR. 

8D91 : DO 

EF 


272 


BNE 

HLOOP 


8E66 : F0 

3C 


376 

PRTEVAL 

BEQ 

PRTEXIT 

;END OF LINE? DON•T DO 

CR 

8D93 : AD 

FI 

95 

273 


LDA 

BORDER 

; IF THERE 

8E68 : C9 

3B 


377 


CMP 

# $3B 

; " ; " 


8D96 : FO 

4F 


274 


BEQ 

HOMEOUT 

; IS BORDER 

8E6A : F0 

39 


378 


BEQ ' 

PRTNXCHR 



8D98:A2 

00 


275 


LDX 

#$00 

; THEN MAKE IT. 

8E6C : C9 

40 


379 


CMP 

#$40 

; " @ " 


8D9A:20 

14 

94 

276 


JSR 

GETMEMAD 


8E6E : DO 

06 


380 


BNE 

PRTEVAL1 



8D9D:AC 

EF 

95 

277 


LDY 

LENH 


8E70 : 20 

48 

93 

381 


JSR 

CR 



8DA0: 88 



278 


DEY 



8E73 : 4C 

Ab 

8E 

382 


JMP 

PRTNXCHR 



8DAI : 88 



279 


DEY 



8E76 : C9 

23 


383 

PRTEVAL1 CMP 

#$23 

; "#" 


8DA2 : AD 

FI 

95 

280 


LDA 

BORDER 


8E78 : DO 

05 


384 


BNE 

PRTEVAL2 



8DA5 : 91 

06 


281 

HBORD1 

STA 

(PTR1),Y 


8E7A : 20 

73 

F2 

385 


JSR 

SETNORM 



8DA7 : 88 



282 


DEY 



8E7D : F0 

26 


386 


BEQ 

PRTNXCHR 

;ALWAYS TAKEN 


8DA8: 10 

FB 


283 


BPL 

HBORD1 


8E7F:C9 

24 


387 

PRTEVAL2 CMP 

#$24 

; "$" 


8DAA:18 



284 


CLC 



8E81 : DO 

05 


388 


BNE 

PRTEVAL3 



8DAB : A5 

06 


285 


LDA 

PTR1 


8E83 : 20 

77 

F 2 

389 


JSR 

INVERSE 



8DAD: CE 

EF 

95 

286 


DEC 

LENH 


8E86 : F0 

1D 


390 


BEQ 

PRTNXCHR 

.•ALWAYS TAKEN 


8DB0:6D 

EF 

95 

287 


ADC 

LENH 


8E88 : C9 

25 


391 

PRTEVAL3 CMP 

#$25 



8DB3 : EE 

EF 

95 

288 


INC 

LENH 


8E8A : DO 

05 


392 


BNE 

PRTEVAL4 



8DB6:85 

06 


289 


STA 

PTR 1 


8E8C: 20 

80 

F2 

393 


JSR 

FLASH 

.•ALWAYS TAKEN 


8DB8 : 90 

02 


290 


BCC 

HBORD15 


8E8F : DO 

14 


394 


BNE 

PRTNXCHR 



8DBA : E6 

07 


291 


INC 

PTR1+1 


8E91 : 20 

7B 

DD 

395 

PRTEVAL4 JSR 

FRMEVL 

;EVALUATE FORMULA (STR 

OR NU1 

8DBC:AE 

FO 

95 

292 

HBORD15 

LDX 

LENV 


8E94 : 24 

11 


396 


BIT 

$11 

.•STRING OR NUMBER? 


8DBF:CA 



293 


DEX 



8E96 : 30 

AC 


397 


BMI 

STRPRT 

;BRANCH IF STRING 


8DC0:AO 

00 


294 


LDY 

#$00 


8E98: 20 

34 

ED 

398 


JSR 

FOUT 

; TURN NUM IN FAC TO STRING 

8DC2: AD 

FI 

95 

295 

HBORD2 

LDA 

BORDER 


8E9B: 20 

E7 

E3 

399 


JSR 

STRLIT 

.•PREPARE IT FOR PRINTING 

8DC5: 91 

06 


'296 


STA 

(PTR1),Y 


8E9E : 4C 

44 

8E 

400 


JMP 

STRPRT 

.•PRINT IT 


8DC7:C8 



297 


INY 



8EA1 : 2 0 

48 

93 

401 

PRTCR 

JSR 

CR 

; CARRIAGE RETURN 


8DC8 : 91 

06 


298 


STA 

(PTR1),Y 


8EA4 : 60 



402 

PRTEXIT 

RTS 




8DCA: 88 



299 


DEY 



8EA5: 20 

B1 

00 

403 

PRTNXCHR JSR 

CHRGET 

;GETS NEXT CHAR 


8DCB : CA 



300 


DEX 



8EA8:4C 

66 

8E 

404 


JMP 

PRTEVAL 



8DCC : FO 

OE 


301 


BEQ 

HBORD3 


8 E AB: 



405 

* 





8DCE:18 



302 


CLC 



8EAB:20 

73 

F2 

406 

INPUT 

JSR 

SETNORM 

SET NORMAL VIDEO. 


8DCF:A5 

06 


303 


LDA 

PTR 1 


8EAE : 20 

E3 

DF 

407 


JSR 

PTRGET 

GET POINTER 


8DD1 :6D 

EF 

95 

304 


ADC 

LENH 


8EB1 : 20 

6C 

DD 

408 


JSR 

CHKSTR 

OF STRING 


8DD4: 85 

06 


305 


STA 

PTR 1 


8EB4: 85 

85 


409 


STA 

FORPNT 

VARIABLE 


8DD6 : 90 

EA 


306 


BCC 

HBORD2 


8EB6:84 

86 


410 


STY 

FORPNT+1 



8DD8 : E6 

07 


307 


INC 

PTR1+1 


8EB8 : A9 

01 


411 


LDA 

#$01 



8DDA: DO 

E6 


308 


BNE 

HBORD2 


8EBA : 8D 

F8 

95 

412 


STA 

SEMI 



8DDC:AC 

EF 

95 

309 

HBORD3 

LDY 

LENH 


8EBD :t 0 

B7 

00 

413 


JSR 

CHRGOT 

.•CHECK FOR 


8DDF: AD 

FI 

95 

310 


LDA 

BORDER 


SECO : C9 

3B 


414 


CMP 

# $3B 

; SEMICOLON 


8DE2: 91 

06 


311 

HBORD4 

STA 

(PTR1),Y 


8EC2:F0 

0A 


415 


BEQ 

GETSTRP 

; OR 


8DE4 : 88 



312 


DEY 



8EC4: CE 

F8 

95 

416 


DEC 

SEMI 

; FOR A 


8DE5:10 

FB 


313 


BPL 

HBORD4 


8EC7:C9 

2C 


417 


CMP 

# $2C 

; COMMA . 


8DE7 : 20 

F 4 

94 

314 

HOMEOUT 

JSR 

FASTDUMP 

.•REDUMP SCREEN. 

8EC9 : F0 

03 


418 


BEQ 

GETSTRP 



8DEA: 20 

4E 

93 

315 

HOMECURS JSR 

SHRINK 

;HOME CURSOR. 

8ECB:4C 

C9 

DE 

419 


JMP 

SYNERR 



8DED:AD 

ED 

95 

316 


LDA 

POSH 


8ECE : 2 0 

B1 

00 

420 

GETSTRP 

JSR 

CHRGET 



8DF0:85 

17 

317 


STA 

CH 


SEDI :A0 

00 


421 


LDY 

#$00 

;GET LENGTH 


8DF2: AD 

EE 

95 

318 


LDA 

POSV 


8ED3 : B1 

85 


422 


LDA 

(FORPNT), Y 

; AND POINTER 


8DF5 : 85 

18 


319 


STA 

CV 


8ED5 : 8D 

F7 

95 

423 


STA 

LEN 

;TO ACTUAL 


8DF7:4C 

60 

93 

320 


JMP 

EXPAND 

; EXIT 

8ED8:C8 



424 


INY 


.•STRING. 


8DFA : 



321 

* 




8ED9 : B1 

85 


425 


LDA 

(FORPNT), Y 



8DFA:A2 

01 


322 

VTAB 

LDX 

#$01 

; GET PARAMETER. 

8EDB:85 

08 


426 


STA 

PTR2 



8DFC:86 

3C 


323 


STX 

Al L 


8EDD : C8 



427 


INY 




8DFE:86 

3D 


324 


STX 

Al H 


8EDE : B1 

85 


428 


LDA 

(FORPNT),Y 



8EOO :AE 

FO 

95 

325 


LDX 

LENV 


8EE0: 85 

09 


429 


STA 

PTR2 +1 



8E03: AD 

FI 

95 

326 


LDA 

BORDER 


8EE2: A2 

00 


430 


LDX 

#$00 

;GET INPUT 


8E06 : FO 

02 


327 


BEQ 

VTAB1 


8EE4: 86 

3C 


431 


STX 

A1L 

.•PARAMETERS 


8EO8 : CA 



328 


DEX 



8EE6:86 

3D 


432 


STX 

A1H 



8E09:CA 



329 


DEX 



8EE8 : A9 

0F 


433 


LDA 

#$0F 



8E0A:86 

3E 


330 

VTAB1 

STX 

A2L 


8EEA:85 

3E 


434 


STA 

A2L 



8E0C: 20 

B9 

94 

331 


JSR 

GETNUMPR 


8EEC : 20 

B9 

94 

435 


JSR 

GETNUMPR 



8E0F: 4 8 



332 


PHA 


;ADD TO POSV 

8EEF : C9 

09 


436 


CMP 

#$09 



8E10 : 20 

4E 

93 

333 


JSR 

SHRINK 

;TO PRODUCE 

8EF1 : 08 



437 


PHP 




8E13 : 68 



334 


PLA 


.•CURSOR 

8EF2: 90 

04 


438 


BCC 

II 



8E14 : 18 



335 


CLC 


.•INDEX RELATIVE 

8EF4 : E9 

09 


439 


SBC 

#$09 



8E15 :6D 

EE 

95 

336 


ADC 

POSV 

;TO TOP OF SCREEN. 

8EF6:E6 

3F 


440 


INC 

A2H 



8E18: 85 

18 


337 


STA 

CV 


8EF8:8D 

FA 

95 

441 

II 

STA 

MODE 



8E1A : C6 

18 


338 


DEC 

CV 


8EFB : C9 

07 


442 


CMP 

#$07 



8E1C:4C 

60 

93 

339 


JMP 

EXPAND 


8EFD:08 



443 


PHP 




8E1F : 



340 

* 




8EFE : A9 

FF 


444 


LDA 

# $FF 



8E1F:A2 

01 


341 

HTAB 

LDX 

#$01 

; SEE ABOVE. 

1 8F00:B0 

28 


445 


BCS 

MAXOUT 




86 








8F02: 20 4E 93 

446 

JSR 

SHRINK 

;FIND MAXIMUM LENGTH 

8F0 5 : AC EF 95 

447 

LDY 

LENH 

;OF STRING THAT 

8F08 : AF. F0 95 

448 

LDX 

LENV 

;THAT CAN FIT 

8F0B : AD FI 95 

449 

LDA 

BORDER 

;INTO WINDOW. 

8F0E : F0 04 

450 

BEQ 

MAXLENCK 


8F10 :CA 

451 

DEX 



8F11 :CA 

452 

DEX 



8F12: 88 

453 

DEY 



8F13 : 88 

454 

DEY 



8F14 : 84 42 

455 MAXLENCK STY 

A4 L 


8F16 : AD F2 95 

456 

LDA 

POS IH 


8F19 :E5 17 

457 

SBC 

CH 


8F1B:48 

458 

PHA 



8F1C: 20 60 93 

459 

JSR 

EXPAND 


8F1F:68 

460 

PLA 



8F20 : 18 

461 

CLC 



8F21 :CA 

462 MAXLOOP 

DEX 



8F22 : F0 06 

463 

BEQ 

MAXOUT 


8F24 : 65 42 

464 

ADC 

A4 L 


8F26 : 90 F9 

465 

B CC 

MAXLOOP 


8F28 :A9 FF 

466 

LDA 

# $FF 


8F2A: 85 3E 

467 MAXOUT 

STA 

A2L 


8F2C:A2 01 

468 

LDX 

#$01 


8F2E: 86 3C 

469 

STX 

A1L 


8F30:E8 

470 

INX 



8F31 :8E FB 95 

471 

STX 

CASE 


8F34: 20 B9 94 

472 

JSR 

GETNUMPR 


8F37:28 

473 

PLP 



8F38 : 08 

474 

PHP 



8F39-.B0 06 

475 

BCS 

MAXSTO 


8F3B:C9 00 

476 

CMP 

#$00 


8F3D-.D0 02 

477 

BNE 

MAXSTO 


8F3F : A5 3E 

478 

LDA 

A2L 


8F41 : 8D F9 95 

479 MAXSTO 

STA 

MAXLEN 


8F44-.CD F7 95 

480 

CMP 

LEN 


8F47:B0 03 

481 

BCS 

10 


8F4 9 :8D F7 95 

482 

STA 

LEN 


8F4C: 28 

483 10 

PLP 



8F4 D:F0 14 

484 

BEQ 

GET 


8F4F: 90 2D 

485 

BCC 

READVAR 


8F51 : 68 

486 

PLA 



8F52:20 6F FD 

487 

JSR 

GETLN 

; CODE FOR MODE 8. . . 

8F55 :EC F9 95 

488 

CPX 

MAXLEN 

; THE DOS MODE. 

8F58: 90 03 

489 

BCC 

DOSOUT 


8F5A:AE F9 95 

490 

LDX 

MAXLEN 


8F5D:8E F6 95 

491 DOSOUT 

STX 

CURS 


8F60:4C 7D 91 

492 

JMP 

LEAVE 


8F63: 68 

493 GET 

PLA 



8F64: 20 OD 92 

494 GET1 

JSR 

GETCHAR 

;THIS IS MODE 7. 

8F67:8D 00 02 

495 

STA 

IN 

; THE GET A CHAR MODE 

8F6A : AD F9 95 

496 

LDA 

MAXLEN 


8F6D : F0 07 

497 

BEQ 

GETOUT 


8F6F : 09 80 

498 

ORA 

#$80 


8F71 : CD 00 02 

499 

CMP 

IN 


8F7 4: DO EE 

500 

BNE 

GET1 


8F76 : A9 01 

501 GETOUT 

LDA 

#$01 


8F78 :8D F6 95 

502 

STA 

CURS 


8F7B-.4C 7D 91 

503 

JMP 

LEAVE 


8F7E:A0 00 

504 READVAR 

LDY 

#0 


8F80:8C F6 95 

505 

STY 

CURS 


8F83 : 28 

506 

PLP 



8F84:B0 1C 

507 

BCS 

GBEGIN 


8F86 : CC F7 95 

508 MOVEVAR 

CPY 

LEN 

; MOVE THE STRING 

8F89 :F0 17 

509 

BEQ 

GBEGIN 

;INTO THE INPUT 

8F8B:B1 08 

510 

LDA 

( PTR2)/Y 

.•BUFFER 

8F8D: 09 80 

511 

ORA 

#$80 

; AND ONTO 

8F8F: 20 B3 91 

512 

JSR 

CHK 

; THE SCREEN. 

8F92 : AC F6 95 

513 

LDY 

CURS 


8F95:B0 0B 

514 

BCS 

GBEGIN 


8F97: 99 00 02 

515 

STA 

IN, Y 


8F9A: 20 DB 92 

516 

JSR 

COUT 


8F9D: AC F6 95 

517 

LDY 

CURS 


8FA0: DO E4 

518 

BNE 

MOVEVAR 


8FA2:8C F7 95 

519 GBEGIN 

STY 

LEN 


8FA5:4C 84 90 

520 

JMP 

BEGIN 


8FA8: AD FB 95 

521 RDKEY 

LDA 

CASE 

; SHIFT OUT. 

8FAB:C9 01 

522 

CMP 

#$01 


8FAD :D0 03 

523 

BNE 

RDO 



8FAF : CE FB 95 
8FB2 : 20 OD 92 
8FB5 : 20 59 92 
8FB8 : C9 9B 
8FBA : DO 11 
8FBC : EE FB 95 
8FBF : AD FB 95 
8FC2 : C9 03 
8FC4: DO EC 
8FC6:A9 00 
8FC8 : 8D FB 95 
8FCB.-F0 E5 
8FCD : C9 8D 
8FCF : DO 1F 
8FD1 : 20 8C 91 
8FD4 : 20 9E 91 
8FD7:AE F6 95 
8FDA : EC F7 95 
8FDD : BO 06 
8FDF : 20 22 93 
8FE2 : 4C D7 8F 
8FE5 : AD F8 95 
8FE8 : DO 03 
8FEA: 20 48 93 
8FED : 4C 7D 91 
8FF0 : C9 88 


DEC 

JSR 

JSR 

CMP 

BNE 


524 

525 RDO 

526 

527 

528 

529 CASETOG INC 

530 LDA 

531 CMP 

532 BNE 

533 LDA 

534 STA 

535 BEQ 

536 NEXTA CMP 

537 BNE 

538 RETURN JSR 

539 JSR 

540 RETURN1 LDX 

541 CPX 

542 BCS 

543 JSR 

544 JMP 

545 RETURN2 LDA 

546 BNE 

547 JSR 

548 RETURN3 JMP 

549 NEXTB CMP 


CASE 

GETCHAR 

GETKEY2 

# $9B 
NEXTA 
CASE 
CASE 
#$03 
RDO 
#$00 
CASE 
RDO 

# $8D 
NEXTB 
BEGINSUB 
REDUCE 
CURS 

LEN 

RETURN2 

ADVANCE 

RETURN1 

SEMI 

RETURN3 

CR 

LEAVE 

#$88 


; GET A CHAR. 
;ESC? 

; SHIFT HANDLER. 


.•RETURN? 

;GET RID OF TRAILING 
.•SPACES. MOVE 
.-CURSOR TO 
; END OF STRING 
; AND EXIT 
;THROUGH INPUT 
.•COLLECTOR. 


; BACKSPACE? 


Tavola 1. 

1 modi del comando & INPUT 

modi 

caratteri ammessi 

0,9 

Sono accettati tutti i caratteri. Quelli di controllo sono 
visualizzati in inverse. Il modo 9 e tutti i modi più alti non 
leggono la stringa della memoria. 

1,10 

1 caratteri minuscoli non sono accettati. 

2,11 

1 caratteri di controllo non sono accettati. 

3,12 

1 caratteri minuscoli e quelli di controllo non sono accettati. 

4,13 

Sono ammesse solo le cifre. 

5,14 

Sono ammessi le cifre e i + o i 

6,15 

Sono ammessi le cifre, i + o i - e il punto decimale. 

7 

Come il GET dell’Applesoft. Il terzo parametro specifica 
il valore ASCII del carattere da ricevere; 
se zero è ammesso qualunque carattere. 

8 

Input dai file di testo. Sono ammessi virgole, due punti e 
punti e virgola. Si veda il testo per il posizionamento cursore. 


(Continua) 


Le istruzioni inverse, 
normal e flash 

Window Magic supporta anche le 
normali istruzioni INVERSE, NOR¬ 
MAL e FLASH. Notate che i caratte¬ 
ri di controllo sono sempre stampati 
in inverse. 

& INPUT A$,A,B - L'input 
nella finestra è un grande migliora¬ 
mento rispetto all’input normale. 
Permette di introdurre virgole e lette¬ 
re minuscole, impiega varie caratteri¬ 
stiche di editing, consente di fissare 
una lunghezza massima di campo, 
visualizza in inverse i caratteri di 
controllo e permette un modo specia¬ 
le di introduzione dei numeri. A è il 
modo di input definito dall'utente e 
B la lunghezza massima desiderata 
della stringa. 

I modi di input sono descritti nei 
particolari più avanti. 

& GOTO A,B - Questa istruzio¬ 
ne sposta la finestra presentemente 
attiva alle coordinate orizzontale e 
verticale A,B nella fascia 0-255. 

La finestra ricomincia ciclicamen¬ 
te quando la sua posizione si avvici¬ 
na a 255. 

Per esempio se una finestra è alla 
posizione ' 0,255 comparirà sullo 
schermo tutto tranne la riga più al¬ 
ta, a causa di questo effetto ciclico. 
& GOTO può essere usato per pro¬ 
durre certi effetti molto interessanti. 
La posizione relativa del cursore di 
ciascuna finestra viene conservata, di 
modo che è possibile stampare in 
una finestra mentre essa si sta muo¬ 
vendo (o ne dà l'impressione), stam- 
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I 


pan do e muovendo in un loop. Pote¬ 
te definire una finestra fuori scher¬ 
mo, stampare una gran quantità di in¬ 
formazioni e poi spostarla sullo 
schermo in modo che tutte le infor¬ 
mazioni compaiano all'istante. 

& RESTORE - Se per qualche 


8FF2: DO 

0B 


550 

BNE 

NEXTC 

8FF4 : AD 

F6 

95 

551 BACKSPAC LDA 

CURS 

8FF7:F0 

03 


552 

BEQ 

GRDKEY 

8FF9: 20 

7D 

92 

553 

JSR 

BACK 

8FFC : 4C 

A8 

8F 

554 GRDKEY 

JMP 

RDKEY 

8FFF:C9 

91 


555 NEXTC 

CMP 

#$91 

9001 :D0 

2C 


556 

BNE 

NEXTD 

9003:20 

9E 

91 

557 QUIT 

JSR 

REDUCE 

9 0 0 6 : AD 

F7 

95 

558 

LDA 

LEN 

9009:85 

3D 


559 

STA 

A1H 

900B:85 

3C 


560 

STA 

A1L 

900D: CD 

F 6 

95 

561 

CMP 

CURS 

9010:B0 

03 


562 

BCS 

QUIT2 

9012:20 

90 

91 

563 

JSR 

BACKLOOP 

9015 : AD 

F6 

95 

564 QUIT2 

LDA 

CURS 

9018:85 

3C 


565 

STA 

Al L 

901A:4C 

22 

90 

566 

JMP 

QUIT4 

901D:A9 

A0 


567 QUIT3 

LDA 

# $A0 

901F: 20 

DB 

92 

568 

JSR 

COUT 

9022:AD 

F6 

95 

569 QUIT4 

LDA 

CURS 

9025:C5 

3D 


570 

CMP 

A1H 

9027:D0 

F 4 


571 

BNE 

QUIT3 

9029:20 

90 

91 

572 

JSR 

BAC^LOOP 

902C:4C 

E5 

8F 

573 

JMP 

RETURN2 

902F:C9 

95 


574 NEXTD 

CMP 

#595 

9031:D0 

12 


575 

BNE 

NEXTE 

9033:AE 

F6 

95 

576 FORWARD 

LDX 

CURS 

9036 :EC 

F7 

95 

577 

CPX 

LEN 

9039:90 

04 


578 

BCC 

FORI 

903B:A9 

A0 


579 

LDA 

# $A0 

903D: DO 

06 


580 

BNE 

NEXTE 

903F: 20 

22 

93 

581 FORI 

JSR 

ADVANCE 

9042 : 4C 

A8 

8F 

582 

JMP 

RDKEY 

9045:C9 

8 A 


583 NEXTE 

CMP 

# $ 8A 

9047:D0 

1B 


584 

BNE 

NEXTF 

904 9 :A5 

17 


585 DOWN 

LDA 

CH 

904B:85 

3C 


586 

STA 

Al L 

904D:4C 

59 

90 

587 

JMP 

DOWN 2 

9050:20 

22 

93 

588 DOWN1 

JSR 

ADVANCE 

9053 :A5 

17 


589 

LDA 

CH 

9055 :C5 

3C 


590 

CMP 

Al L 

9057:F0 

08 


591 

BEQ 

DOWNOUT 

90 5 9 : AD 

F6 

95 

592 DOWN2 

LDA 

CURS 

90 5C: CD 

F7 

95 

593 

CMP 

LEN 

90 5F: DO 

EF 


594 

BNE 

DOWN1 

9061 : 4C 

A8 

8F 

595 DOWNOUT 

JMP 

RDKEY 

9064:C9 

8B 


'596 NEXTF 

CMP 

# $8B 

9066 : DO 

18 


597 

BNE 

NEXTG 

9068:A5 

17 


598 UP 

LDA 

CH 

906A:85 

3C 


599 

STA 

Al L 

906C:4C 

78 

90 

600 

JMP 

UP2 

906F: 20 

7D 

92 

601 UP1 

JSR 

BACK 

9072:A5 

17 


602 

LDA 

CH 

9074:C5 

3C 


603 

CMP 

Al L 

9076 :F0 

05 


604 

BEQ 

UPOUT 

9078:AD 

F6 

95 

605 UP2 

LDA 

CURS 

907B: DO 

F2 


606 

BNE 

UP1 

907D:4C 

A8 

8F 

607 UPOUT 

JMP 

RDKEY 

9080 : C9 

82 


608 NEXTG 

CMP 

#$82 

9082 : DO 

06 


609 

BNE 

NEXTH 

9084 : 20 

8C 

91 

610 BEGIN 

JSR 

BEGINSUB 

9087 : 4C 

A8 

8F 

611 

JMP 

RDKEY 

90 8A:C9 

8E 


612 NEXTH 

CMP 

#$8E 

90 8C: DO 

17 


613 

BNE 

NEXTI 

908E : 20 

8C 

91 

614 END 

JSR 

BEGINSUB 

9091:20 

9E 

91 

615 

JSR 

REDUCE 

9094:4C 

9A 

90 

616 

JMP 

END2 

9097:20 

22 

93 

617 END1 

JSR 

ADVANCE 

90 9A: AD 

F6 

95 

618 END2 

LDA 

CURS 

90 9D: CD 

F7 

95 

619 

CMP 

LEN 

90A0: DO 

F5 


620 

BNE 

END 1 

90A2:4C 

A8 

8F 

621 

JMP 

RDKEY 

9 0 A 5 : C 9 

84 


622 NEXTI 

CMP 

#$84 

90A7:F0 

04 


623 

BEQ 

DELETE 

90A9:C9 

FF 


624 

CMP 

# $FF 

90AB: DO 

3F 


625 

BNE 

NEXTJ 

90AD: AD 

F6 

95 

626 DELETE 

LDA 

CURS 

90B0: CD 

F7 

95 

627 

CMP 

LEN 

90B3:F0 

34 


628 

BEQ 

DELOUT 

90B5: 85 

3C 


629 

STA 

Al L 

90B7:EE 

F6 

95 

630 DELOOP 

INC 

CURS 

90BA-.AE 

F6 

95 

631 

LDX 

CURS 

90BD:EC 

F7 

95 

632 

CPX 

LEN 

90C0:B0 

19 


633 

BCS 

DOUT 

90C2:BD 

00 

02 

634 

LDA 

IN. X 

90C5: 4 8 



635 

PHA 


90C6: 20 

DB 

92 

636 

JSR 

COUT 

90C9 : CE 

F6 

95 

637 

DEC 

CURS 

90CC: CE 

F6 

95 

638 

DEC 

CURS 

90CF:AE 

F6 

95 

639 

LDX 

CURS 


ragione la videata viene distrutta, 
questa istruzione la ripristina, ristam¬ 
pando sullo schermo tutte le fine¬ 
stre. La potete usare per commutare 
avanti e indietro fra l’impiego di 
Window Magic e quello delle norma¬ 
li routine di output su schermo. 



90D2 : 

68 



640 

MOVE CURSOR BACK. 

90D3 : 

9D 

00 

02 

641 


90D6 : 

EE 

F6 

95 

642 


90D9 : 

DO 

DC 


643 


90DB : 

A9 

A0 


644 

~Q? 

90DD : 

20 

DB 

92 

64 5 


90E0 : 

CE 

F6 

95 

646 

REMOVE TRAI LING SPACES. 

90E3 : 

20 

90 

91 

647 

IF CURSOR 

90E6 : 

CE 

F7 

95 

648 

OUT TOO FAR. 

90E9 : 

4C 

A8 

8F 

649 


90EC : 

C9 

89 


650 

BACK IT UP. 

90EE : 

DO 

65 


651 


90F0 : 

AC 

FA 

95 

652 


90F3 : 

CO 

05 


653 

BLANK OUT REST 

90F5 : 

90 

0E 


654 

OF STRING . 

90F7 : 

AE 

F6 

95 

655 


90FA : 

BD 

00 

02 

656 


90FD : 

C9 

AB 


657 


90FF : 

F0 

51 


658 


9101 : 

C9 

AD 


659 


9103: 

F0 

4D 


660 


9105 : 

AE 

F7 

95 

661 

BACK UP AGAIN . 

9108 : 

EC 

F6 

95 

662 

AND EXIT. 

91 0B : 

F0 

45 


663 

FORWARD SPACE? 

91 OD : 

CA 



664 


910E : 

BD 

00 

02 

665 

ADVANCE CURSOR. 

9111 : 

C9 

A0 


666 

IF CURSOR AT STRING END 

>9113: 

DO 

01 


667 

THEN LOAD A 

9115: 

CA 



668 

SPACE AND CONTINUE. 

9116: 

E8 



669 


9117: 

EC 

F9 

95 

670 


911A : 

: F0 

36 


671 


911C : 

: E8 



672 

: ~J? 

911D : 

: 8E 

F7 

95 

673 


9120 : 

: CA 



674 

:ADVANCE CURSOR 

9121 : 

: BD 

00 

02 

675 

; UNTIL IT IS 

9124 

: E8 



676 

:DIRECTLY 

9125 

: 9D 

00 

02 

677 

; BELOW 

9128 

: CA 



678 

; OR AT END 

9129 

: EC 

F6 

95 

679 

;OF STRING. 

912C 

: DO 

F2 


680 


912E 

: AD 

F6 

95 

681 


9131 

: 48 



682 


9132 

: AA 



683 


9133 

: A9 

A0 


684 


9135 

: CO 

04 


685 

; *K? 

9137 

: 90 

02 


686 


9139 

: A9 

B0 


687 

.-BACK UP CURSOR 

913B 

: 9D 

00 

02 

688 

; UNTIL IT IS 

913E 

: BD 

00 

02 

689 

.•DIRECTLY ABOVE 

9141 

: 20 

DB 

92 

690 

; OR AT BEGINNING 

9144 

: AE 

F6 

95 

691 

;OF INPUT. 

9147 

: EC 

F7 

95 

692 


914 A 

: DO 

F2 


693 


914C 

: 68 



694 


914D 

: 85 

3C 


695 


914F 

: 20 

90 

91 

696 


9152 

: 4C 

A8 

8F 

697 

; ~B? 

9155 

: C9 

8F 


698 


9157 

: DO 

03 


699 

;GO TO BEGINNING 

9159 

: 20 

OD 

92 

700 

;OF STRING. 

915C 

: AE 

F 6 

95 

701 

; ~N? 

915F 

: EC 

F9 

95 

702 


9162 

: 90 

03 


703 

.•GOTO BEGINNING. 

9164 

: 4C 

A8 

8F 

704 

.•REDUCE TRAI LI NG SPACES 

9167 

: 20 

B3 

91 

705 

; AND GOTO 

91 6 A 

: B0 

F8 


706 

.-END OF STRING. 

916C 

: 9D 

00 

02 

707 


916F 

: EC 

F7 

95 

708 


9172 

: 90 

03 


709 


9174 

: EE 

F7 

95 

710 


9177 

: 20 

DB 

92 

711 

; ~D? 

917A 

: 4C 

A8 

8F 

712 


917D 

: AE 

F6 

95 

713 

.•DELETE? 

9180 

: 20 

39 

D5 

714 


9183 

: C8 



715 


9184 

: A2 

8D 


716 


9186 

: 20 

E9 

E3 

717 


9189 

: 4C 

9A 

DA 

718 

; SAVE CURSOR POS. 

918C 

: A9 

00 


719 

; MOVE EACH 

918E 

: 8 5 

3C 


720 

; CHAR DOWN ONE 

9190 

: AD 

F6 

95 

721 

; IN BUFFER 

9193 

: C5 

3C 


722 

;PRINTING THEM 

9195 

: F0 

06 


723 

;AT THE SAME 

9197 

: 20 

7D 

92 

724 

.-TIME. 

919A 

: 4C 

90 

91 

725 


919D 

: 60 



726 


919E 

: AC 

F7 

95 

727 


91A1 

: CO 

00 


728 


91 A3 

: F0 

OD 


729 


Le caratteristiche 
di & input 

Lo spostamento del curso¬ 
re. Tutte e quattro le frecce degli Ap¬ 
ple Ile e Ile funzionano con questo 
programma. Nell'Apple II Plus 



PLA 




STA 

IN. X 



INC 

CURS 



BNE 

DELOOP 


DOUT 

LDA 

#$A0 

.-BLANK OUT 


JSR 

COUT 

; LAST CHAR. 


DEC 

CURS 



JSR 

BACKLOOP 

.-BACK UP. 


DEC 

LEN 


DELOUT 

JMP 

RDKEY 

; EXIT 

NEXTJ 

CMP 

#$89 



BNE 

NEXTK 


INSERT 

LDY 

MODE 

; DON 1 T INSERT 


CPY 

#$05 

;BEFORE "+" OR 


BCC 

INS1 

:DURING MUMBER 


LDX 

CURS 

; ENTRY. 


LDA 

IN, X 



CMP 

# $AB 

; " +• " 


BEQ 

INSOUT 



CMP 

# $AD 

: " - " 


BEQ 

INSOUT 


INS1 

LDX 

LEN 



CPX 

CURS 



BEQ 

INSOUT 



DEX 


; FLUSH LAST CHAR 


LDA 

IN, X 

;IF IT'S 


CMP 

# $A0 

; A SPACE. 


BNE 

INS2 



DEX 



INS2 

INX 




CPX 

MAXLEN 



BEQ 

INSOUT 



INX 




STX 

LEN 


IMOVELOP DEX 


; MOVE CHARS 


LDA 

IN. X 

;UPWARD 


INX 


; IN BUFFER. 


STA 

IN. X 



DEX 




CPX 

CURS ■ 



BNE 

IMOVELOP 



LDA 

CURS 



PHA 




TAX 




LDA 

# $A0 

;STORE SPACE OR 


CPY 

#$04 

.•ZERO FOR # ENTRY 


BCC 

INS3 

; AT CURSOR. 


LDA 

# $B0 

; " 0 " 

INS3 

STA 

IN, X 


IP R LOOP 

LDA 

IN, X 

; PRINT OUT BUFFER. 


JSR 

COUT 



LDX 

CURS 



CPX 

LEN 



BNE 

IP R LOOP 



PLA 




STA 

Al L 



JSR 

BACKLOOP 

.-BACK UP CURSOR. 

INSOUT 

JMP 

RDKEY 


NEXTK 

CMP 

# $8F 

; *0? 


BNE 

NEXTL 


IMBED 

JSR 

GETCHAR 

; GET ANY CHAR. 

NEXTL 

LDX 

CURS 

; DON * T USE CHAR 


CPX 

MAXLEN 

;IF CURSEQUMAXLEN. 


BCC 

INO 


GRDKEY1 

JMP 

RDKEY 


INO 

JSR 

CHK 

.•CHECK IF CHAR IS OK 


BCS 

GRDKEY1 



STA 

IN, X 

; PUT IT IN BUFFER. 


CPX 

LEN 

; INC. LEN IF 


BCC 

INI 

.•CURSOR POSITION . 


INC 

LEN 

;IS>LEN. 

INI 

JSR 

COUT 

.-PRINT IT. 


JMP 

RDKEY 

;GO BACK FOR MORE. 

LEAVE 

LDX 

CURS 

;THIS COLLECTS 


JSR 

GDBUFS 

.•INPUT AND 


INY 


;RETURNS TO 


LDX 

# $8D |r 

.•APPLESOFT. 


JSR 

$E3E9 



JMP 

$DA9A 


BEGINSUB LDA 

#$00 

.-BACK UP CURSOR 


STA 

Al L 

; TO BEGINNING. 

BACKLOOP LDA 

CURS 

.-BACK UP CURSOR 


CMP 

Al L 

; TO AlL. 


BEQ 

BACKLOUT 



JSR 

BACK 



JMP 

BACKLOOP 


BACKLOUT RTS 



REDUCE 

LDY 

LEN 

;FLUSH 

REDLOOP 

CPY 

#$00 

; TRAILING 


BEQ 

REDOUT 

.•SPACES. 




(Continua) 
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$FFFF 

ROM 

$D000 

Locazioni di I/O 
$C000 

DOS o ProDOS 
$9600 

Routines Window Magic 
$8C33 

Buffers della finestra, Descriptors 
e Scratch Buffer ($3C0 bytes) 

$7800 

Stringhe Applesoft 
oGP Buffer ProDOS 


Tavola 2. Descriptor. 

<CTRL>K e <CTRL>J spostano il 
cursore in su e in giù. Tuttavia in 
entrambi i sensi le frecce in su e in 
giù non andranno oltre il limite del¬ 
la stringa impostata. <CTRL>B spo¬ 
sta il cursore all'inizio della stringa, 
e <CTRL>N lo sposta alla fine del¬ 
la stringa. 

Le caratteristiche speciali 
di editing. Ogni volta che si ricor¬ 
re a & INPUT la stringa viene trasfe¬ 
rita dalla memoria al buffer di input 
e allo schermo per l'editing (più 
avanti verrà spiegato un accorgimen¬ 
to per impedire che questo avvenga). 
Nell'Apple Ile e nel Ile <CTRL>D 
o DELETE elimina il carattere sotto 
il cursore. Nel Ile e nel Ile 
<CTRL>I o il tasto <TAB> inseri¬ 
sce uno spazio al cursore. Se siete 
in modo numerico <CTRL>I inseri¬ 
sce uno zero al cursore. 

Come terminare l'input. Pre¬ 
mendo <RETURN> si accetta tutto 
l'input, qualunque sia in quel mo¬ 
mento la posizione del cursore. 
<CTRL>Q accetta l'input solo fino 
alla posizione del cursore. I caratteri 
dal cursore alla fine del campo ven¬ 
gono scartati. Le normali istruzioni 
di input dell'Applesoft fanno sempre 
un ritorno carrello quando si preme 
<RETURN>. Con la nuova routine 
di input si impedisce che ciò avven¬ 
ga impiegando un punto e virgola in¬ 
vece della virgola dopo il nome della 
stringa: 


& INPUT A$;5,50 


E' quindi possibile fare l'input nel¬ 
l'ultima linea di una finestra senza 
causare lo scorrimento della finestra. 
I caratteri di controllo. Qual- 


91A5: 88 


730 

DEY 



91A6 : B9 00 

02 

731 

LDA 

IN, Y 


91A9 : C9 A0 


732 

CMP 

#$A0 


91AB :D0 05 


733 

BNE 

REDOUT 


91AD : CE F7 

95 

734 

DEC 

LEN 


91B0: DO EF 


735 

BNE 

REDLOOP 


91B2: 60 


736 REDOUT 

RTS 



91B3: AC FA 

95 

737 CHK 

LDY 

MODE 

CHECK IF CHARACTER 

91B6 : F0 1 7 J1 


738 

BEQ 

CHK2 

IS OK WITH 

91B8:C9 A0 


739 

CMP 

#$A0 

USER MODE. 

91BA : B0 09 


740 

BCS 

CHK1 

IF NOT, IT CONVERTS 

91BC : CO 01 


741 

CPY 

#501 

IT OR RETURNS 

91BE:F0 0F 


742 

BEQ 

CHK2 

WITH CARRY SET 

91C0:18 


743 

CLC 


INDICATING 

91C1: 69 40 


744 

ADC 

#$40 

IT * S IMPOSSIBLE. 

91C3: DO 0A 


745 

BNE 

CHK2 


91C5 : C9 E0 


746 CHK1 

CMP 

# $E0 


91C7: 90 06 


747 

BCC 

CHK2 


91C9: CO 02 


748 

CPY 

#$02 


91CB : F0 02 


749 

BEQ 

CHK2 


91CD: 29 DF 


750 

AND 

#$DF 


91CF: CO 04 


751 CHK2 

CPY 

#$04 


91D1:B0 01 


752 

BCS 

CHK3 


91D3: 60 


753 

RTS 



91D4 : C9 B0 


754 CHK3 

CMP 

#$B0 


91D6: 90 05 


755 

BCC 

CHK4 


91D8:C9 BA 


756 

CMP 

# $BA 


91DA:B0 01 


757 

BCS 

CHK4 


91DC : 60 


758 

RTS 



91DD: CO 05 


759 CHK4 

CPY 

#$05 


91DF: 90 10 


760 

BCC 

CHKNO 


91E1 : C9 AD 


761 

CMP 

# $AD 

. M_M 

91E3:F0 21 


762 

BEQ 

CHK6 


91E5 : C9 AB 


763 

CMP 

# $AB 

. H + ll 

91E7 : F0 1D 


764 

BEQ 

CHK6 


91E9: CO 05 


765 

CPY 

#.$05 


91EB : F0 04 


766 

BEQ 

CHKNO 


91ED:C9 AE 


767 

CMP 

# $AE 

: " . " 

91EF:F0 02 


768 

BEQ 

CHK5 


91F1:38 


769 CHKNO 

SEC 



91F2: 60 


770 

RTS 



91F3: AC F7 

95 

771 CHK5 

LDY 

LEN 


91F6:88 


772 CHKL 

DEY 



91F7:B9 00 

02 

773 

LDA 

IN, Y 


91FA:C9 AE 


774 

CMP 

# $ AE 

; ° . " 

91FC : F0 F3 


775 

BEQ 

CHKNO 


91FE: CO 00 


776 

CPY 

#$00 


92 0 0 : DO F4 


777 

BNE 

CHKL 


9202 : A9 AE 


778 

LDA 

# $AE 

; " . " 

9204 : 18 


779 

CLC 



9205:60 


780 

RTS 



9206 ;AE F6 

95 

781 CHK6 

LDX 

CURS 


9209 : DO E6 


782 

BNE 

CHKNO 


920B:18 


783 

CLC 



920C: 60 


784 

RTS 



920D: 20 D6 

94 

785 GETCHAR 

JSR 

GETMEMCU 

;MAKE A CURSOR . 

9210 :B1 06 


'Te 6 

LDA 

(PTR1),Y 


9212:85 3C 


787 

STA 

A1L 


9214 :2C EB 

95 

788 

BIT 

IIC 

.•CHECK FOR //E OR //C 

9217 :F0 1A 


789 

BEQ 

CURS40 

; 11 PLUS — 80 COL. NOT SUPPORTED 

9219-.2C 1E 

CO 

790 

BIT 

RDALTCHR 

.•CHECK FOR 80-COL FIRMWARE 

921C : 10 15 


791 

BPL 

CURS40 


921E : 29 7F 


792 

AND 

#$7F 

.•INVERSE MOST CHARS 

9220 : 2C EB 

95 

793 

BIT 

IIC 

.•CHECK FOR /IC OR ENH . //E 

9223:50 18 


794 

BVC 

CURSOUT 

; OLD //E 

9225:B8 


795 

CLV 



9226 : C9 40 


796 

CMP 

#$40 

;CHARS $40-$5F 

9228:90 13 


797 

BCC 

CURSOUT 

; (MOSTLY CAPS) 

922A:C9 60 


798 

CMP 

#$60 

; MUST BE CONVERTED 

922C:B0 0F 


799 

BCS 

CURSOUT 

; TO $00-$lF 

922E: 29 1F 


800 

AND 

# $ 1F 

; $ 4 0 -$ 5F IS MOUSETEXT! 

9230 : 4C 3D 

92 

801 

JMP 

CURSOUT 


9233 : C9 E0 


802 CURS40 

CMP 

♦ $E0 

; W/O 80-COL FIRMWARE, 

9235:90 02 


803 

BCC 

CURS40A 

; FLASHING CURSOR 

9237:29 DF 


804 

AND 

# $DF 

; CAN BE USED 

9239:29 3F 


805 CURS40A 

AND 

#$3F 

; LOWERCASE MUST BE 

92-3B : 09 40 


806 

ORA 

#$40 

; UPPERCASE FLASHING. 

923D : 91 06 


807 CURSOUT 

STA 

(PTR1 ) ,Y 


923F : 20 35 

94 

808 

JSR 

SETCHAR 


9242 : AD 00 

CO 

809 GETKEY 

LDA 

KBD 

; GET A KEYSTROKE. 

9245:10 FB 


810 

BPL 

GETKEY 


92 4 7 ; 8D 10 

co 

811 

STA 

STROBE 


924A : 85 3D 


812 

STA 

A1H 


924C : 20 D6 

94 

813 

JSR 

GETMEMCU 


924F:A5 3C 


814 

LDA 

Al L 


9251:91 06 


815 

STA 

(PTR1),Y 

; REMOVE CURSOR. 

9253:20 35 

94 

816 

JSR 

SETCHAR 


9256 :A5 3D 


817 

LDA 

A1H 


9258:60 


818 

RTS 


; EXIT . 

92 59 :A2 03 


819 GE7KEY2 

LDX 

#$03 

;REDEFINE KEYS 

92 5B:CA 


820 DEFKEYL 

. DEX 


;KEYBOARD FOR 


90 







925C: 30 

08 


821 


BMI 

DEFKEYOT 

;FOR BACKSLASHES, 

925E:DD 

77 

92 

822 


CMP 

KEYLIST,X 


9261 : DO 

F8 


823 


BNE 

DEFKEYL 


9263 :BO 

7A 

92 

824 


LDA 

REPLACEL, X 


9266 : AC 

FB 

95 

825 

DEFKEYOT LDY 

CASE 

;SHIFT CHAR. 

9269 : DO 

OB 


826 


BNE 

GKEYOUT 

;TO LOWER CASE 

926B : C9 

EO 


827 


CMP 

* $E0 

; IF NECESSARY. 

926D : BO 

07 


828 


BCS 

GKEYOUT 


926F : C9 

CO 


829 


CMP 

#$C0 


9271:90 

03 


830 


BCC 

GKEYOUT 


9273:18 



831 


CLC 



9274 : 69 

20 


832 


ADC 

#$20 


9276:60 



833 

GKEYOUT 

RTS 



9277:9A 

98 

83 

834 

KEYLIST 

DFB 

$9A,$98,$83 

927A: DB 

DC 

DF 

835 

REPLACEL DFB 

$DB,$DC,$DF 

927D : 20 

4E 

93 

836 

BACK 

JSR 

SHRINK 

.-BACK UP CURSOR 

9280-.A5 

17 


837 


LDA 

CH 

; AND DEC. 

9282 : CD 

ED 

95 

838 


CMP 

POSH 

;CURS. 

928 5 : DO 

07 


839 


BNE 

BACK1 


9287 : AD 

F2 

95 

840 


LDA 

POS1H 


928A:85 

17 


841 


STA 

CH 


92 8C:C6 

18 


842 


DEC 

CV 


928E:C6 

17 


843 

BACK1 

DEC 

CH 


9290:CE 

F6 

95 

844 


DEC 

CURS 


9293 : 20 

60 

93 

845 


JSR 

EXPAND 


9296:60 



846 


RTS 



9297: 



847 

* 




9297:AD 

F5 

95 

848 

GOTO 

LDA 

CURWIND 

; DON 1 T MOVE 

929A : DO 

03 


849 


BNE 

GOTOO 

; WINDOW 0. 

929C : 4C 

3D 

8C 

850 


JMP 

GSYNERR 


92 9F : A2 

00 


851 

GOTOO 

LDX 

#$00 

;GET PARAMTERS. 

92A1: 86 

3D 


852 


STX 

AlH 


92A3 : 86 

3C 


853 


STX 

Al L 


92A5 : CA 



854 


DEX 



92A6: 86 

3E 


855 


STX 

A2L 


92A8: 20 

B9 

94 

856 


JSR 

GETNUMPR 


92AB: 4 8 



857 


PHA 


; ADJUST 

92AC:18 



858 


CLC 


.•CURSOR POSITION 

92AD: 65 

17 


859 


ADC 

CH 


92AF : 38 



860 


SEC 



92B0: ED 

ED 

95 

861 


SBC 

POSH 


92B3: 8 5 

17 


862 


STA 

CH 


92B5: 68 



863 


PLA 



92B6:8D 

ED 

95 

864 


STA 

POSH 


92 B9:E6 

3C 


865 


INC 

Al L 


92BB: 20 

B9 

94 

866 


JSR 

GETNUMPR 

;GET 2ND 

92BE:48 



867 


PHA 


;PARAMETER. 

92BF:18 



868 


CLC 


; ADJUST CURSOR 

92C0: 65 

18 


869 


ADC 

CV 

.•POSITION. 

92C2: 38 



870 


SEC 



92C3: ED 

EE 

95 

871 


SBC 

POSV 


92C6:85 

18 


872 


STA 

CV 


92C8: 68 



873 


PLA 



92C9:8D 

EE 

95 

874 


STA 

POSV 


92CC: 20 

15 

93 

875 


JSR 

SAVEDESC 

; SAVE CHANGES. 

92CF:20 

00 

93 

876 


JSR 

POSICALC 


92D2:4C 

F 4 

94 

877 


JMP 

FASTDUMP 

.-DUMP SCREEN. 

92D5: 



878 

• 




92D5: 20 

F 4 

94 

879 

RESTORE 

JSR 

FASTDUMP 

.-DUMP SCREEN 

92D8:4C 

EA 

8D 

880 


JMP 

HOMECURS 

; AND HOME CURSOR. 

92DB: 



881 

* 




92DB : 09 

80 


882 

COUT 

ORA 

#$80 

;PRINT 

92DD:C9 

AO 


883 


CMP 

#$A0 

; CHAR IN A. 

92DF.-B0 

02 


884 


BCS 

COUT1 

; CONTROL 

92E1:29 

3F 


885 


AND 

# $3F 

;CHARS IN 

92E3: 25 

32 


886 

COUT1 

AND 

INVFLG 

; INVERSE. 

92E5: 05 

F3 


887 


ORA 

$F3 


92E7:4 8 



888 


PHA 


;ADVANCE 

92E8: 20 

D6 

94 

889 


JSR 

GETMEMCU 

;CURSOR. 

92EB: 68 



890 


PLA 



92EC: 91 

06 


891 


STA 

(PTR1),Y 


92EE: 20 

35 

94 

892 


JSR 

SETCHAR 


92F1:4C 

22 

93 

893 


JMP 

ADVANCE 


92F4 : 



894 

* 




92F4:AO 

06 


895 

LOADDESC LDY 

#$06 

;GETS DESCRIPTOR 

92F6:B1 

04 


896 

LOADDES1 LDA 

(PTR),Y 

;EXCEPT 

92F8: 99 

EB 

95 

897 


STA 

POSH-2,Y 

;CH & CV. 

92FB:88 



898 


DEY 



92FC: CO 

01 


899 


CPY 

#$01 


92FE: DO 

F6 


900 


BNE 

LOADDES1 


9300 : 18 



901 

POSICALC CLC 



9301:AD 

ED 

95 

902 


LDA 

POSH 


9304:6D 

EF 

95 

903 


ADC 

LENH 


9307 :8D 

F2 

95 

904 


STA 

POS IH 


930A:18 



905 


CLC 



930B:AD 

EE 

95 

906 


LDA 

POSV 


930E:6D 

FO 

95 

907 


ADC 

LENV 


9311:«D 

F3 

95 

908 


STA 

POS IV 


9314:60 



909 


RTS 



9315: 



910 

* 




9315:A0 

02 


911 

SAVEDESC LDY 

#$02 

; SAVE 


9317 :B9 

EB 

95 

912 SAVEDES 

LDA 

POSH-2,Y ; 

DESCRIPTOR 

931A:91 

04 


913 

STA 

(PTR),Y 

EXCEPT 

931C : C8 



914 

INY 


FOR CH 

931D: CO 

07 


915 

CPY 

#$07 

AND CV. 

931F : DO 

F6 


916 

BNE 

SAVEDES 


9321 : 60 



917 

RTS 



9322 : 



918 * 




9322:EE 

F6 

95 

919 ADVANCE 

INC 

CURS 

ADVANCE 

9325:20 

4E 

93 

920 

JSR 

SHRINK 

CURSOR. 

9328 :E6 

17 


921 

INC 

CH 


932A:A5 

17 


922 

LDA 

CH 


932C: CD 

F2 

95 

923 

CMP 

POS IH 


932F: DO 

14 


924 

BNE 

ADVOUT 


9331:AD 

ED 

95 

925 ADVANCE1 LDA 

POSH 


9334 : 85 

17 


926 

STA 

CH 


9336 :E6 

18 


927 

INC 

CV 


9338 :A5 

18 


928 

LDA 

CV 


933A: CD 

F3 

95 

929 

CMP 

POS IV 


933D: DO 

06 


930 

BNE 

ADVOUT 


933F: 20 

72 

93 

931 

JSR 

SCROLL ; 

SCROLL IF NEEDED. 

9342:C6 

18 


932 

DEC 

CV 


9344 : 60 



933 

RTS 



934 5 :4C 

60 

93 

934 ADVOUT 

JMP 

EXPAND 


9348 : 



935 * 




9348:20 

4E 

93 

936 CR 

JSR 

SHRINK 

' CARRIAGE 

934B:4C 

31 

93 

937 

JMP 

ADVANCE1 ; 

: RETURN. 

934E : 



938 * 




934 E : AD 

FI 

95 

939 SHRINK 

LDA 

BORDER 

IF THERE 

9351:F0 

OC 


940 

BEQ 

SHRIKOUT 

IS A BORDER, 

9353 :EE 

ED 

95 

941 

INC 

POSH 

SHRINK 

9356 :EE 

EE 

95 

942 

INC 

POSV 

WINDOW BY 

93 59 : CE 

F2 

95 

943 

DEC 

POS IH 

ONE IN 

935C: CE 

F3 

95 

944 

DEC 

POS1V 

ALL DIRECTIONS. 

935F: 60 



945 SHRIKOUT RTS 



9360: 



94 6 * 




9360 : AD 

FI 

95 

947 EXPAND 

LDA 

BORDER 

APPOSITE 

9363:F0 

OC 


948 

BEQ 

EXPANOUT 

;OF SHRINK. 

9365:CE 

ED 

95 

949 

DEC 

POSH 


9368:CE 

EE 

95 

950 

DEC 

POSV 


936B:EE 

F2 

95 

951 

INC 

POS IH 


936E:EE 

F 3 

95 

952 

INC 

POS1V 


9371 : 60 



953 EXPANOUT RTS 



9372: 



954 • 




9372 :A2 

00 


955 SCROLL 

LDX 

#$00 

: SET UP 

9374:AD 

FI 

95 

956 

LDA 

BORDER 

.PARAMETERS 

9377 :F0 

01 


957 

BEQ 

SCI 

;FOR MONITOR 

9379 :E8 



958 

INX 


; MEMORY 

937A:86 

3C 


959 SCI 

STX 

Al L 

; MOVE. 

937C : 20 

14 

94 

960 

JSR 

GETMEMAD 


937F : A5 

06 


961 

LDA 

PTR1 


9381:85 

42 


962 

STA 

A4 L 


9383 : A5 

07 


963 

LDA 

PTR1+1 


9385:85 

43 


964 

STA 

A4 H 


9387:A6 

3C 


965 

LDX 

Al L 


9389 :E8 



966 

INX 



938A : 20 

14 

94 

967 

JSR 

GETMEMAD 


938D : A5 

06 


968 

LDA 

PTR1 


938F: 85 

3C 


969 

STA 

A1 L 


9391 : A5 

07 


970 

LDA 

PTR1+1 


9393 : 85 

3D 


971 

STA 

AlH 


9395:AE 

F0 

95 

972 

LDX 

LENV 


9398 : 20 

14 

94 

973 

JSR 

GETMEMAD 


939B:38 



974 

SEC 



939C : A5 

06 


975 

LDA 

PTR1 


93 9E : E9 

01 


976 

SBC 

#$01 


93A0: 85 

3E 


977 

STA 

A2L 


93A2:A5 

07 


978 

LDA 

PTR1+1 


93A4:E9 

00 


979 

SBC 

#$00 


93A6:85 

3F 


980 

STA 

A2H 


93A8:A0 

00 


981 

LDY 

#$00 


93AA:20 

2C 

FE 

982 

JSR 

MOVE 

; MOVE IT. 

93AD : AE 

F0 

95 

983 

LDX 

LENV 


93B0 : CA 



984 

DEX 



93B1 : AD 

FI 

95 

985 

LDA 

BORDER 


93B4 : F0 

01 


986 

BEQ 

SC25 


93B6 : CA 



987 

DEX 



93B7 : 20 

14 

94 

988 SC25 

JSR 

GETMEMAD 


93BA:AC 

EF 

95 

989 

LDY 

LENH 


93BD:84 

3C 


990 

STY 

Al L 


93BF:A0 

00 


991 

LDY 

#$00 


93C1: AD 

FI 

95 

992 

LDA 

BORDER 


93C4:F0 

03 


993 

BEQ 

SC3 


93C6:C8 



994 

INY 



93C7:C6 

3C 


995 

DEC 

Al L 


93C9:A9 

A0 


996 SC3 

LDA 

#$A0 

;BLANK OUT 

93CB:91 

06 


997 SCRLOOP 

STA 

(PTR1),Y 

;LAST LINE. 

93CD:C8 



998 

INY 



93CE:C4 

3C 


999 

CPY 

A1L 


93D0: DO 

F9 


1000 

BNE 

SCRLOOP 


93D2:4C 

F4 

94 

1001 

JMP 

* FASTDUMP 

.-DUMP SCREEN. 

93D5 : 



1002 • 




93D5:AE 

F5 

95 

1003 GWINADD 

LDX 

CURWIND 

.•CALCULATE 

93D8-.18 



1004 GWINADD1 CLC 


.•ADDRESS OF WINDOW 

93D9: AD 

FE 

95 

1005 

LDA 

MEMBOT 

;BY ADDING 

93DC: 69 

CO 


1006 

ADC 

#$C0 

;ADD 960 

93DE:85 

04 


1007 

STA 

PTR 


9}E0:AD 

FF 

95 

1008 

LDA 

MEMBOT+1 


93E3 : 69 

03 


1009 

ADC 

#$03 


93E5 : 85 

05 


1010 

STA 

PTR+1 


93E7 : 2C 

EA 

95 

1011 

BIT 

COL80 


93EA:10 

OD 


1012 

BPL 

ONLY40 


93EC:18 



1013 

CLC 


; FOR 80 COL., 

93ED:A5 

04 


1014 

LDA 

PTR 

;ADD ANOTHER 960 







(Continua) 


91 












93EF:69 

CO 


1015 

ADC 

#$C0 


93F1 : 85 

04 


1016 

STA 

PTR 


93F3:A5 

05 


1017 

LDA 

PTR+1 


93F5: 69 

03 


1018 

ADC 

#$03 


93F7: 85 

05 


1019 

STA 

PTR+1 


93F9:E0 

00 


1020 

ONLY40 CPX 

#$0 


93FB:F0 

16 


1021 

BEQ 

GWINOUT 


93FD:A0 

00 


1022 

LDY 

#$00 


93FF:18 



1023 

GWINLOOP CLC 



9400:B1 

04 


1024 

LDA 

(PTR),Y 


9402 : 65 

04 


1025 

ADC 

PTR 


9404:48 



1026 

PHA 



9405:C8 



1027 

INY 



9406 :B1 

04 


1028 

LDA 

(PTR),Y 


9408:65 

05 


1029 

ADC 

PTR+1 


940A:85 

05 


3 030 

STA 

PTR + 1 


94 OC : 68 



1031 

PLA 



940D:85 

04 


1032 

STA 

PTR 


940F:88 



1033 

DEY 



9410:CA 



1034 

DEX 



9411:D0 

EC 


1035 

BNE 

GWINLOOP 


9413:60 



1036 

GWINOUT RTS 



9414 : 



1037 

* 



9414:18 



1038 

GETMEMAD CLC 


USES PTR 

9415 :A5 

04 


1039 

LDA 

PTR 

TO FIND 

9417:69 

09 


1040 

ADC 

#$09 

ADDRESS 

9419:85 

06 


1041 

STA 

PTR1 

OF THE START 

941B:A5 

05 


1042 

LDA 

PTR + 1 

OF A ROW . 

941D:69 

00 


1043 

ADC 

#$00 

RESULT PUT 

94 1F : 8 5 

07 


1044 

STA 

PTR1+1 

IN PTR1. 

9421:E0 

00 


1045 

CPX 

#$00 


9423 : F0 

OF 


1046 

BEQ 

GETMEOUT 


9425:18 



1047 

GETMLOOP CLC 



9426 :A5 

06 


1048 

LDA 

PTR1 


9428 : 6D 

EF 

95 

1049 

ADC 

LENH 


942B: 85 

06 


1050 

STA 

PTR1 


942D: 90 

02 


1051 

BCC 

GETMNEXT 


94 2F:E6 

07 


1052 

INC 

PTR1+1 


9431 : CA 



1053 

GETMNEXT DEX 



94 32 : DO 

FI 


1054 

BNE 

GETMLOOP 


9434 : 60 



1055 

GETMEOUT RTS 



9435: 



1056 

* 



9435:A5 

17 


1057 

SETCHAR LDA 

CH 

FIND WHICH 

9437:CD 

EC 

95 

1058 

CMP 

NOCOLS 

WINDOW CONTROLS 

94 3A:B0 

OD 


1059 

BCS 

SETCHOUT 

POSITION 

94 3C : A5 

18 


1060 

LDA 

CV 

CH,CV. 

943E:C9 

1 8 


1061 

CMP 

#24 

GET CHAR 

9440:B0 

07 


1062 

BCS 

SETCHOUT 

FROM THAT WINDOW 

944 2 : AD 

F 4 

95 

1063 

LDA 

NUMWIND 


9445:85 

42 


1064 

STA 

A4 L 


94 4 7 : DO 

43 


1065 

BNE 

WINDFNXT 

;ALWAYS 

9449:60 



1066 

SETCHOUT RTS 



94 4A : 20 

D8 

93 

1067 

WINDFIND JSR 

GWINADD1 


944D: 20 

F 4 

92 

1068 

JSR 

LOADDESC 


9450:AD 

ED 

95 

1069 

LDA 

POSH 


9453:30 

OE 


1070 

BMI 

WNDFIND1 


94 55 :A5 

17 


1071 

LDA 

CH 


9457:CD 

ED 

95 

1072 

CMP 

POSH 


945A:90 

30 


1073 

BCC 

WINDFNXT 


94 5C: CD 

F2 

95 

1074 

CMP 

POS IH 


94 5F:B0 

2B 


1075 

BCS 

WINDFNXT 


9461:90 

OB 


1076 

BCC 

WNDFIND2 


9463 : AD 

F2 

95 

1077 

WNDFIND1 LDA 

POS IH 


9466:30 

24 


1078 

BMI 

WINDFNXT 


9468 :C5 

17 


1079 

CMP 

CH 


946A:90 

20 


1080 

BCC 

WINDFNXT 


94 6C:FO 

1E 


1081 

BEQ 

WINDFNXT 



94 6E: AD 

EE 

95 

1082 

WNDFIND2 LDA 

POSV 



9471:30 

0E 


1083 

BMI 

WNDFIND3 



94 73 :A5 

18 


1084 

LDA 

CV 



94 75 : CD 

EE 

95 

1085 

CMP 

POSV 



9478 : 90 

12 


1086 

BCC 

WINDFNXT 



94 7A-.CD 

F3 

95 

1087 

CMP 

POS1V 



94 7D:B0 

OD 


1088 

BCS 

WINDFNXT 



94 7F: 90 

11 


1089 

BCC 

WINFOUND 



94 81 : AD 

F3 

95 

1090 

WNDFIND3 LDA 

POS IV 



9484:30 

06 


1091 

BMI 

WINDFNXT 



94 86 :C5 

18 


1092 

CMP 

CV 



9488:F0 

02 


1093 

BEQ 

WINDFNXT 



94 8A : B0 

06 


1094 

BCS 

WINFOUND 



94 8C:C6 

42 


1095 

WINDFNXT DEC 

A4 L 



94 8E:A6 

42 


1096 

LDX 

A4 L 



9490 : 10 

B8 


1097 

BPL 

WINDFIND 



9492:A5 

18 


1098 

WINFOUND LDA 

CV 

; PRINT 


9494:20 

CI 

FB 

1099 

JSR 

BASCALC 

;THAT CHAR. 


9497:20 

D6 

94 

1100 

JSR 

GETMEMCU 



94 9A-.B1 

06 


noi 

LDA 

(PTR1),Y 



94 9C: A4 

17 


1102 

LDY 

CH 



94 9E : 2C 

EA 

95 

1103 

BIT 

COL80 

.-CHECK FOR 8 0 COL 


94Al : 10 

0E 


1104 

BPL 

ONWARD 



94A3 : 4 8 



1105 

PHA 


; SAVE A 


94A4 : 98 



1106 

TYA 




94A5: 4A 



1107 

LSR 

A 

.•DIVIDE BY 2 


94A6:A8 



1108 

TAY 




94A7:A9 

00 


1109 

LDA 

#$0 

;CARRYEQUODD/EVEN 


94A9:2A 



ino 

ROL 

A 



94AA:49 

01 


1111 

EOR 

#$01 



94AC : AA 



1112 

TAX 


; XEQU1 EVEN,XEQU0 

ODD 

94AD : BD 

54 

CO 

1113 

LDA 

PAGE1,X 

; SWITCH IN PROPER 

PAGE 

94B0:68 



1114 

PLA 


; RESTORE A 


94B1 : 91 

28 


1115 

ONWARD STA 

(BASL) , Y 



94B3 : 20 

D5 

93 

1116 

JSR 

GWINADD 

.•RESTORE CURRENT 


94B6 : 4C 

F 4 

92 

1117 

JMP 

LOADDESC 

.•WINDOW AND EXIT. 


94B9 : 



1118 

* 





94B9 : 20 

67 

DD 

1119 

GETNUMPR JSR 

FRMNUM 

;GETS NUMBER 


94 BC : 2 0 

FB 

E6 

1120 

JSR 

CONINT 

; FROM APPLESOFT 


94 BF : A5 

3C 


1121 

LDA 

Al L 

; SURE A COMMA FOLLOWS. 

94C1: DO 

03 


1122 

BNE 

GETNUMP1 



94C3: 20 

BE 

DE 

1123 

JSR 

CHKCOM 



94C6 : A5 

Al 


1124 

GETNUMP1 LDA 

FACLO 

; MAKE SURE IT’S 

< A2L 

94C8 : CS 

3D 


1125 

CMP 

A1H 

; AND > A1H . 


94CA:90 

07 


1126 

BCC 

GRANGERR 



94CC : C5 

3E 


1127 

CMP 

A2L 



94CE : F0 

02 


1128 

BEQ 

GETNUOUT 



94D0:B0 

01 


1129 

BCS 

GRANGERR 



94D2-.60 



1130 

GETNUOUT RTS 


; EXIT. 


94D3 : 



1131 

• 




94D3:4C 

99 

E1 

1132 

GRANGERR JMP 

RANGERR 

,-ILLEGAL QUANT. 

ERROR 

94D6 : 



1133 

* 




94D6: 38 



1134 

GETMEMCU SEC 


;GETS LOCATION 


94D7:A5 

18 


1135 

LDA 

CV 

; IN WINDOW 


94D9: ED 

EE 

95 

1136 

SBC 

POSV 

; FROM CURSOR 


94 DC:AA 



1137 

TAX 


.•POSITION. 


94DD : 20 

14 

94 

1138 

JSR 

GETMEMAD 



94E0: 38 



1139 

SEC 




94E1 : A5 

17 


1140 

LDA 

CH 



94 E3: ED 

ED 

95 

1141 

SBC 

POSH 



94 E6 : A8 



1142 

TAY 




94E7: 60 



1143 

RTS 





94E8 : 1144 * 

94E8 : AO 07 114 5 SAVEPOS LDY #$07 

94EA : A 5 17 1146 LDA CH 

94EC : 91 04 1147 STA (PTR),Y 

94EE : C8 1148 INY 

94EF : A5 18 1149 LDA CV 

94F1 : 91 04 1150 STA <PTR),Y 

94F3:60 1151 RTS 

94F4 : 1152 * 

94F4 : A2 00 1153 FASTDUMP LDX #$00 


94F6:86 

3E 


1154 


STX 

A2L 

94F8 : 20 

D8 

93 

1155 

WINDLOOP 

' JSR 

GWINADD1 

94FB : 20 

F 4 

92 

1156 


JSR 

LOADDESC 

94FE : AD 

ED 

95 

1157 


LDA 

POSH 

9501:CD 

EC 

95 

1158 


CMP 

NOCOLS 

9504:90 

03 


1159 


BCC 

WNDLP1 

9506 :A9 

00 


1160 


LDA 

#$00 

9508 : 18 



1161 


CLC 


9509:6D 

FE 

95 

1162 

WNDLP1 

ADC 

MEMBOT 

950C:85 

3C 


1163 


STA 

Al L 

950E:AD 

FF 

95 

1164 


LDA 

MEMBOT+1 

9511 : 69 

00 


1165 


ADC 

#$00 

9513:85 

3D 


1166 


STA 

A1H 

9515 : AE 

EE 

95 

1167 


LDX 

POSV 

9518:CA 



1168 


DEX 


9519:86 

3F 


1169 


STX 

A2H 

951B:E8 



1170 


INX 


951C : F0 

53 


1171 


BEQ 

NEXTROW 

951E:E0 

18 


1172 


CPX 

#24 

9520 : 90 

0B 


1173 


BCC 

ADDROW 

9522:EC 

F3 

95 

1174 


CPX 

POS1V 

9525:90 

4 A 


1175 


BCC 

NEXTROW 

9527:A9 

FF 


1176 


LDA 

# $FF 

9529:85 

3F 


1177 


STA 

A2H 

952B: DO 

44 


1178 


BNE 

NEXTROW 

952D : 20 

DD 

95 

1179 

ADDROW 

JSR 

ADD28 

9530 :CA 



1180 


DEX 


9531:D0 

FA 


1181 


BNE 

ADDROW 

9533:F0 

3C 


1182 


BEQ 

NEXTROW 

9535:38 



1183 

ROWLOOP 

SEC 


9536 : ED 

EE 

95 

1184 


SBC 

POSV 

9539:AA 



1185 


TAX 


953A:20 

14 

94 

1186 


JSR 

GETMEMAD 

953D:A0 

00 


1187 


LDY 

#$00 

953F:AE 

ED 

95 

1188 


LDX 

POSH 

9542:EC 

EC 

95 

1189 


CPX 

NOCOLS 

9545 : 90 

15 


1190 


BCC 

COLULOOP 

9547:EC 

F2 

95 

1191 


CPX 

POS IH 

954A:90 

22 


1192 


BCC 

COLOUT 

954C : 8A 



1193 


TXA 


954D: 4 9 

FF 


1194 


EOR 

# $FF 

954F:18 



1195 


CLC 


9550:69 

01 


1196 


ADC 

#$01 

9552:65 

06 


1197 


ADC 

PTR1 

9554 : 85 

06 


1198 


STA 

PTR 1 

95 56 :A2 

00 


1199 


LDX 

#$00 

9558 : 90 

02 


1200 


BCC 

COLULOOP 

95 5A : E6 

07 


1201 


INC 

PTR1+1 

955C:EC 

EC 

95 

1202 

COLULOOP CPX 

NOCOLS 

95 5F:B0 

OD 


1203 


BCS 

COLOUT 

9561:EC 

F2 

95 

1204 


CPX 

POS IH 

9564:B0 

08 


1205 


BCS 

COLOUT 

9566 :B1 

06 


1206 


LDA 

( PTR1),Y 

9568 : 91 

3C 


1207 


STA 

( Al L) , Y 

956A:E8 



1208 


INX 


956B:C8 



1209 


INY 


956C : DO 

EE 


1210 


BNE 

COLULOOP 

956E : 20 

DD 

95 

1211 

COLOUT 

JSR 

ADD2 8 

9571 :E6 

3F 


1212 

NEXTROW 

INC 

A2H 

9573:A5 

3F 


1213 


LDA 

A2H 

9575:C9 

18 


1214 


CMP 

#$18 

9577:B0 

05 


1215 


BCS 

NEXTWIND 

9579 : CD 

F3 

95 

1216 


CMP 

POS1V 

957C: 90 

B7 


1217 


BCC 

ROWLOOP 

957E : E6 

3E 


1218 

NEXTWIND INC 

A2L 

9580 :A6 

3E 


1219 


LDX 

A2L 

9582:EC 

F 4 

95 

1220 


CPX 

NUMWIND 

9585:B0 

03 


1221 


BCS 

NEXTWND1 

9587 : 4C 

F8 

94 

1222 


JMP 

WINDLOOP 


SAVES CURSOR 
POSITION 
INTO 

DESCRIPTOR . 


DUMP ALL 
WINDOWS FROM 
0 TO NUMWIND . 
INTO SCRATCH 
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Riga inferiore della finestra 
Buffer finestra (bytes LENfTLENV) 

Riga superiore della finestra 

Descriptor della finestra (9 bytes) 
IC,A$8BE8,L$A18 

Figura 1. Allocazione della memoria. 


siasi carattere di controllo da voi bat¬ 
tuto, che non sia uno dei comandi 
sopra menzionati, viene introdotto 
nella stringa e visualizzato in inver¬ 
se. Potete anche introdurre i caratteri 
di controllo che sono comandi pre¬ 
mendo prima <CTRL>0. 

In tal modo è possibile introdurre 
direttamente nella stringa spaziature 
aH'indietro, ritorni carrello e via di¬ 
cendo. Anche qualsiasi carattere di 
controllo che sia stampato con un'i¬ 
struzione & PRINT verrà stampato 
in inverse. 

I caratteri minuscoli e spe¬ 
ciali. I possessori di Apple II Plus 
con un adattatore per minuscole pos- 


958A:AD 

FE 

95 

1223 

NEXTWND1 

LDA 

MEMBOT 

958D: 8 S 

3C 


1224 


STA 

Al L 

958F : AD 

FF 

95 

1225 


LDA 

MEMBOT+1 

9592 : 85 

3D 


1226 


STA 

Al H 

9594:A9 

00 


1227 


LDA 

#$0 

9596:85 

3 E 


1228 


STA 

A2L 

9598:20 

CI 

FB 

1229 

MOVESI 

JSR 

BASCALC 

959B:A5 

28 


1230 


LDA 

BASL 

959D:85 

FB 


1231 


STA 

ZP 

959F : A5 

29 


1232 


LDA 

BASL+1 

95A1: 85 

FC 


1233 


STA 

ZP + 1 

95A3 : A2 

00 


1234 


LDX 

#50 

95A5 : A0 

00 


1235 


LDY 

#$0 

9 5A7 : 2C 

EA 

95 

1236 

MOVES2 

BIT 

COL8 0 

95AA:10 

10 


1237 


BPL 

SKIP 

95AC : 2C 

55 

CO 

1238 


BIT 

PAGE2 

95AF:B1 

3C 


1239 


LDA 

(AlL), Y 

95B1: 81 

FB 


1240 


STA 

(ZP,X) 

95B3:2C 

54 

CO 

1241 


BIT 

PAGE1 

95B6 : C8 



1242 


INY 


95B7:CC 

EC 

95 

1243 


CPY 

NOCOLS 

95BA : B0 

10 


1244 


BCS 

INCROW 

95BC:B1 

3C 


1245 

SKIP 

LDA 

(A1L),Y 

95BE:81 

FB 


1246 


STA 

(ZP,X) 

95C0:E6 

FB 


1247 


INC 

ZP 

95C2: DO 

02 


1248 


BNE 

SKIP2 

95C4:E6 

FC 


1249 


INC 

ZP + 1 

9SC6 : C8 



1250 

SKIP2 

INY 


95C7:CC 

EC 

95 

1251 


CPY 

NOCOLS 

95CA:90 

DB 


1252 


BCC 

MOVES2 

95CC:20 

DD 

95 

1253 

INCROW 

JSR 

ADD28 

9 5CF : E6 

3E 


1254 


INC 

A2L 

95D1:A5 

3E 


1255 


LDA 

A2L 

95D3 : C9 

18 


1256 


CMP 

#$18 

95D5:90 

CI 


1257 


BCC 

MOVES1 

95D7: 20 

D5 

93 

1258 


JSR 

GWINADD 

95DA : 4C 

F4 

92 

1259 


JMP 

LOADDESC 

95DD:18 



1260 

ADD28 

CLC 


9 5DE : A5 

3C 


1261 


LDA 

Al L 

95E0 : 6D 

EC 

95 

1262 


ADC 

NOCOLS 

95E3: 85 

3C 


1263 


STA 

Al L 

95E5 : 90 

02 


1264 


BCC 

ADD280UT 

95E7;E6 

3D 


1265 


INC 

A1H 

95E9:60 



1266 

ADD280UT RTS 


95EA : 



1267 

» 



95EA: 00 



1268 

COL80 

DFB 

$00 

95EB:00 



1269 

IIC 

DFB 

$00 

. //E 







95EC : 28 



1270 

NOCOLS 

DFB 

$28 

95ED: 00 



1271 

POSH 

DFB 

$00 

95EE : 00 



1272 

POSV 

DFB 

$00 

95EF.-28 



1273 

LENH 

DFB 

$28 

95F0:18 



1274 

LENV 

DFB 

$18 

95F1 : 00 



1275 

BORDER 

DFB 

$00 

95F2 : 00 



1276 

POS IH 

DFB 

$00 

95F3 : 00 



1277 

POS1V 

DFB 

$00 

95F4: 00 



1278 

NUMWIND 

DFB 

$00 

95F5 : 00 



1279 

CURWIND 

DFB 

$00 

95F6 : 00 



1280 

CURS 

DFB 

$00 

9SF7 : 00 



1281 

LEN 

DFB 

$00 

95F8 : 00 



1282 

SEMI 

DFB 

$00 

95F9:00 



1283 

MAXLEN 

DFB 

$00 

95FA:00 



1284 

MODE 

DFB 

$00 

95FB:00 



1285 

CASE 

DFB 

$00 

95FC : 33 

8C 


1286 

MEMTOP 

DW 

START 

95FE : 00 

78 


1287 

MEMBOT 

DW 

$7800 


THEN DUMP 

SCRATCH 

BUFFER 

DIRECTLY ONTO 
SCREEN. 


.•TRANSFER TO SAFE ZP LOCS 


.•CHECK FOR 80 COL 

.•ENABLE AUX MEM 
; GET CHAR FROM SCRATCH BUFFER 
; PUT ON THE SCREEN 


; RIGHT EDGE? 

; GET CHAR FROM BUFFER 
; PUT ON THE SCREEN 
; NEXT SCREEN LOC . 


; NEXT 


; EXIT . 

.-BIT S80EQU80 COL. 

.-BIT $80EQU//C OR //E, S40EQU//C OR ENH 


DESCRIPTOR 
OF CURRENT WINDOW 
KEPT HERE. 


COORDINATE OF BOTTOM 
RIGHT CORNER. 

# OF WINDOWS. 

CURRENT WINDOW. 

CURSOR INDEX 
LENGTH OF STRING. 
SEMICOLON FLAG. 

MAXIMUM STRING LENGTH. 
USER INPUT MODE. 

CASE FLAG. 

TOP AND BOTTOM 
OF WINDOW MEMORY. 


*** SUCCESSFUL ASSEMBLY: NO ERRORS 


Checksum del listato 1 

NOME FILE: WINDOW.MAGIC 
TIPO: B 

LUNGHEZZA: 0A18 
CHECKSUM : 61 


sono usare <ESC> per passare dalle 
maiuscole alle minuscole e vicever¬ 
sa. & INPUT parte nel modo maiu¬ 
scole fisse. Premendo una volta 
<ESC> si accede al modo minusco¬ 
le. Quando si è nel modo minusco¬ 
le, premendo una volta <ESC> si 
passa al maiuscolo per il solo carat¬ 
tere seguente. Premendo <ESC> due 
volte di seguito si fissano le maiu¬ 
scole. I possessori di Apple Ile e Ile 
dovrebbero restare nel modo maiu¬ 
scole fisse e impiegare la normale 
procedura di scambio. Con questo 
programma si possono anche intro¬ 
durre diversi caratteri che non sono 
disponibili sulla tastiera del II Plus. 
<CTRL>Z dà una parentesi quadra 
sinistra, <CTRL>X una barra inver¬ 
sa e <CTRL>C un carattere di sotto- 
lineatura. 

La lunghezza definita dall’u¬ 
tente. Tramite questa caratteristica 
potete fissare un limite per la . lun¬ 
ghezza della stringa. Se però la lun¬ 
ghezza da voi fissata è eccessiva per 
la finestra riceverete un errore di IL- 
LEGAL QUANTITY. Se fissate la 
lunghezza a zero il programma va au¬ 
tomaticamente per default alla dimen¬ 
sione massima che può trovar posto 
nella finestra fino a un massimo di 
255 caratteri. 

I modi. Sono disponibili sedici 
modi per determinare il tipo dell’in¬ 
put che introdurrete (tavola 1). Nei 
casi in cui due modi rispondano alla 
stessa descrizione il secondo modo 
non leggerà la stringa dalla memoria 
al buffer d'input. Il parametro di lun¬ 
ghezza non specifica la lunghezza 


byte funzione 

7,8 Posizione del cursore relativa 

all’angolo in alto a 
sinistra della finestra (CH, CV). 

6 Carattere ASCII del bordo. 

4,5 Lunghezze orizzontale 

e verticale 

della finestra (LENH, LENV). 

2,3 Posizione della finestra 

in relazione allo 
schermo (POSH,POSV). 

0,1 Offset rispetto alla 

finestra seguente (LO,HI). 


Figura 2. 

Disposizione dei dati della finestra. 


93 














Window Magic. Listato 2 

DOS 3.3 


ProDOS 

10 REM - 

20 REM WINDOW.DEMOl 

30 REM DI PAUL NICK 

40 REM COPYRIGHT (C) 1986 

Apple Ile 

Apple Ile 


50 REM BY APPLICANDO 4 

60 REM MICROSPARC, INC 

70 REM - 

80 PRINT CHR$ (4)"BRUN WINDOW.MAGIC": REM CALL 35816 

90 REM IF PEEK (48896) » 76 THEN POKE 115,0: POKE 116, PEEK ( 
116) - 4 

100 REM TOGLIERE 'REM' DALLA LINEA SOPRA PER IL PRODOS 
110 4 DEF PEEK (38380),1,20,3,170 

120 4 HOME 

130 4 PRINT " WINDOW MAGIC "; 

140 FOR X = PEEK (38380) TO 8 STEP - 1: 4 GOTO X,l: NEXT 
150 4 DEF 14,240,3,18,32 

160 4 HOME 

170 & PRINT "DI PAUL NICK"; 

180 FOR Y = 241 TO 255: 4 GOTO 14, Y: NEXT 
190 FOR Y = 0 TO 4: 4 GOTO 14,Y: NEXT 
200 4 DEF 234,19,24,5,170 

210 4 HOME : 4 PRINT " (C) 1986": 4 PRINT " BY APPLICANDO 4" 

: 4 PRINT " MICROSPARC, INC"; 

220 FOR X = 235 TO 255: 4 GOTO X,19: NEXT 
230 FOR X = 0 TO 5: 4 GOTO X,19: NEXT 

240 4 DEF 18,12,16,6,64: 4 HOME : 4 PRINT : 4 PRINT "PREMI SP 

AZIO": 4 PRINT "PER CONTINUARE";: 4 INPUT A$,7,32 
250 4 DEL 

260 4 DEF 5,5,25,15,43 

270 4 HOME : 4 PRINT "COMANDI :": 4 PRINT " A D—ELIMINA CAR": 

4 PRINT " A I--INSERISCE CAR": 4 PRINT " A Q—ACCETTA FINO 
AL CURSORE": 4 PRINT " A B--ALL'INI ZIO": 4 PRINT " A N 

—ALLA FINE" 


280 

4 PRINT : 4 

PRINT 

"SCRIVI QUALUNQUE COSA:" 



290 

4 PRINT : 4 

,PRINT 

">";: 4 INPUT A$,0 

, 15 



300 

4 PRINT : 4 

PRINT 

"HAI SCRITTO:": 4 

PRINT 

: 4 

PRINT ì 

310 

FOR I = 1 TO 

8: FOR 

J = 1 TO 400: NEXT 

: 4 

PRINT 

: NEXT 

320 

4 PRINT " <RETURN> 

PER FINIRE"; 




330 

POKE - 16368 

,0: WAIT - 16384,128 




340 

FOR 1=4 TO 

1 STEP 

- 1: FOR J = 1 TO 

800: 

NEXT : 

: 4 ON 


DEL : NEXT 







nel modo 7. Se il valore è zero il 
modo 7 riceverà qualsiasi carattere. 
Se non è zero attende che sia premu¬ 
to il tasto del valore ASCII del para¬ 
metro. Ad esempio per ricevere la 
lettera A usate: 


& INPUT A$,7,ASC("A") 


Per ricevere qualsiasi carattere 
usate: 


& INPUT A$,7,0 


Per l’input dal dischetto potete na¬ 
turalmente usare la normale istruzio¬ 
ne INPUT dell’Apple, ma tenete con¬ 
to del fatto che il modo 8 presenta il 
vantaggio di lasciarvi immettere vir¬ 
gole dai file di testo (senza per que¬ 
sto provocare un errore di EXTRA 
IGNORED). 

Notate che è questo il solo modo 
che funzionerà con il dischetto. Nota¬ 
te anche che il parametro di lunghez¬ 
za qui funziona ancora. Nella mag¬ 
gior parte dei casi dovrebbe essere 
255. Per scrivere nei file di testo o 
eseguire comandi del dischetto dal¬ 
l’interno di un programma usate una 
normale istruzione PRINT. 


Leggendo da un file di testo in 
DOS 3.3, sia che si usi il modo 8 di 
input sia che si impieghi la normale 
istruzione INPUT dell'Applesoft, si 
causerà la pulitura della linea dall'ul¬ 
tima posizione del cursore all'orlo 
dello schermo. In ProDOS lo scher¬ 
mo viene pulito dal cursore alla fi¬ 
ne. Pertanto prima di leggere da un 
file di testo dovete posizionare il cur¬ 
sore in un posto "sicuro" dello scher¬ 
mo mediante le normali istruzioni di 
posizionamento del cursore. Per e- 
sempio VTAB 19: HTAB 39 spesso 
assolve il compito. 

Non posizionate mai il cursore sul¬ 
la linea 24, altrimenti la videata scor¬ 
rerà di una linea. In ProDOS può dar¬ 
si che dobbiate impartire un coman¬ 
do & RESTORE per ripristinare le 
informazioni alla base dello scher¬ 
mo. 

L'input dei numeri. Il nuovo 
input funziona soltanto con le strin¬ 
ghe, ma potete andare dalle stringhe 
ai numeri e tornare alle stringhe me¬ 
diante le istruzioni STRS(X) e 
VAL(X$). Per esempio per converti¬ 
re il numero X nella stringa X$ usa¬ 
te X$=STR$(X), e per fare la ricon¬ 
versione usate X=VAL(X$). 


Digitazione 
del programma 

Per digitare il programma usate il 
Tool Kit Assembler per introdurre il 
codice sorgente del listato 1 , oppu¬ 
re usate il Monitor per introdurre di¬ 
rettamente il codice esadecimale. Sal¬ 
vate il programma con il comando: 


BSAVE 

WINDOW.M AGIC,A$8BE8,L$ A18 


Sono acclusi due brevi programmi 
dimostrativi. Introducete il program¬ 
ma in Applesoft del listato 2 e sal¬ 
vatelo con il comando: 


S AVE WINDOW.DEMO 1 


Per digitare il secondo programma 
dimostrativo introducete il program¬ 
ma in Applesoft del listato 3 e sal¬ 
vatelo con il comando: 


SAVE WINDOW.DEM02 


Per un aiuto nell'introduzione dei 
listati di Applicando consultate la ru¬ 
brica Per chi comincia in questo nu¬ 
mero della rivista. 

Window Magic è configurato per 
l’inizio dei buffer a $7800 come si 
vede in figura 1. Le allocazioni di 
memoria fissate nei listati pubblica¬ 
ti dovrebbero essere adeguate per la 
maggior parte delle applicazioni, e 
nel vostro programma basterà inseri¬ 
re all’inizio la seguente linea: 


10 PRINT CHR$(4) 

"BRUN WIN DOW.MAGIC 


Ecco come WINDOW.DEMO 1 
(listato 1) inizializza il sistema. 
In ProDOS dovete impostare HI- 
MEM $400 sotto il valore fissato da 
WINDOW.MAGIC. Questo si ottie¬ 
ne in WINDOW.DEMOl con la se¬ 
guente linea: 


90 IF PEEK(48896)=76 THEN PO¬ 
KE 115 ,0: POKE116,PEEK(116)-4 


Se ricevete un messaggio d’errore 
OUT OF MEMORY quando state de¬ 
finendo una finestra può darsi che 
dobbiate allocare più memoria per 
l’immagazzinamento della finestra. 
Questo si può fare in due modi diver¬ 
si. Primo, potete modificare in per¬ 
manenza il programma WINDOW 
.MAGIC cambiando il valore di 
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Window Magic. Listato 3 

DOS 3.3 


ProDOS 

20 REM WINDOW.DEM02 

30 REM DI PAUL NICK 

40 REM COPYRIGHT (C) 1986 

Apple Ile 

Apple Ile 


50. REM BY APPLICANDO & 
60 REM MICROSPARC, INC 


70 REM - 

80 PRINT CHR$ (4);"BLOAD WINDOW.MAGIC": POKE 38398,0: POKE 38399 
,72: CALL 35816 

90 REM IF PEEK (48896) = 76 THEN POKE 115,0: POKE 116, PEEK (1 
16) - 4 

100 REM TOGLIERE 'REM 1 DALLA LINEA SOPRA PER PRODOS 
110 REM LA LINEA 80 CARICA IN MEMORIA CON BLOAD -WINDOW MAGIC- 
E CAMBIA MEMBOT A $6000 PRIMA DI ESEGUIRLO CON UNA CALL. 


120 

& DEF 

100,0,96,96,32: 

& ON 0: & 

VTAB 

12: 

& 

HTAB 

12: 

& 

PR 

130 

140 

INT "UN 
FOR X = 
& GOTO 

MOMENTO,PREGO" 
1 TO 1980: & 
0,0: & ON 0: 

: & ON 1 
PRINT X" ";: 
& HOME : & 

NEXT 

VTAB 

12: 

& 

HTAB 

12: 

& 

PR 



INT "FINESTRA GRANDE 

" : & 

ON 1 





150 

160 

FOR X - 0 TO 255: & 
NEXT : & GOTO 0,0 

GOTO 

X, 0 : 

IF 

X = 40 

THEN 

X = 150 

170 

180 

FOR X = 0 TO 255: & 
NEXT : & GOTO 0,0 

GOTO 

0,X: 

IF 

X » 25 

THEN 

X = 150 


190 FOR X = 1 TO 2000: NEXT : HOME : END 


MEMBOT (linea <INTRODURRE 
IL NUOVO NUMERO> del lista¬ 
to 1) e riassemblando o risalvando 
il file. In alternativa il vostro pro¬ 
gramma può eseguire una serie di 
istruzioni in Applesoft come 
BLOAD WINDOW.MAGIC, cam¬ 
biare i valori a $95FE e $95FF (deci¬ 
male 38398 e 38399) e poi avviare 
il programma con un'istruzione 
CALL. In WINDOW.DEM02 (li¬ 
stato 3) viene usata per impostare 
HIMEM su $6000 questa sequenza: 


80 PRINT CHR$(4) 

"BLOAD WINDOW.MAGIC": 
POKE 38398,0: POKE38399,96: 
CALL 35816 


Il ProDOS esige ancora che HI- 
MEM sia abbassato di altri $400. 
Quando si cambia il valore di HI- 
MEM in ProDOS è importante cam¬ 
biarlo in incrementi di $400 e resta¬ 
re sui confini di $400 (1K). 

Attenzione: poiché può darsi che 
il programma WINDOW.MAGIC 
venga sovrascritto dai dati della fine¬ 
stra, è sempre necessario riavviarlo 
facendone il BRUN dal dischetto, op¬ 
pure facendone il BLOAD e chiaman¬ 
dolo con CALL. Dovete inoltre riav¬ 
viare il programma dal dischetto 
quando cambiate o il set di caratteri 
o il numero delle colonne visualiz¬ 
zate. La memoria per le finestre è al¬ 
locata verso l'alto da HIMEM in dire¬ 
zione delle routine di Magic Win- 
dow, di modo che la finestra definita 
per ultima è la più alta in memoria. 
La figura 2 mostra il formato di 
una singola finestra. Il testo di una 
finestra è immagazzinato capovolto 
nel buffer. 

Il descriptor (nove byte) contiene i 
parametri che definiscono la finestra 
(tavola 2). I simboli di assembler 
usati nel listato sono riportati fra pa¬ 
rentesi. Lo scratch buffer viene usa¬ 
to per riversare rapidamente sullo 
schermo tutte le finestre. 

Come funziona 
il programma 

Quando si fa girare per la prima 
volta Window Magic, viene eseguita 
una routine denominata SETUP (li¬ 
nea 76 del listato 1). Questa reimpo¬ 
sta HIMEM sotto l'arca di memoria 
che contiene le finestre, e imposta il 
vettore di ampersand in modo che 
punti al programma principale, più 
esattamente a START (linea 109). 


Poi salta con JMP a DEFI (linea 
164) che definisce la finestra di sfon¬ 
do e ritorna in Basic. Non dovete de¬ 
finire le stringhe prima di far girare 
Window Magic perché sarebbero so¬ 
vrascritte e distrutte. Così pure au¬ 
mentando MAXFILES in DOS 3.3 
si potrebbe distruggere l'area di me¬ 
moria occupata da Window Magic. 

Quando Window Magic è installa¬ 
to in memoria un comando amper¬ 
sand trasferirà il controllo a Window 
Magic saltando con JMP a START 
(linea 169), che interpreta il coman¬ 
do ed esegue la routine appropriata. 
Se ciò che segue l'ampersand non è 
esatto si può verificare un SYNTAX 
ERROR o un errore di ILLEGAL 
QUANTITY. 

Le routine più importanti sono 
SETCHAR (linea 1057), FAST- 
DUMP (linea 1153) e GETMEM- 
CU (linea 1134). Quando si introdu¬ 
cono le coordinate dello schermo 
SETCHAR determina quale sia la fi¬ 
nestra che ha la priorità per queste 
coordinate, prende dalla finestra il ca¬ 
rattere appropriato e lo mette sullo 
schermo. FASTDUMP riversa rapi¬ 
damente le finestre, in ordine da quel¬ 
la di priorità più bassa a quella di 
priorità più alta, in uno scratch buf¬ 
fer e poi riversa lo scratch buffer sul¬ 
lo schermo. Questa routine viene 
usata per i grandi cambiamenti come 
pulire, eliminare e spostare le fine¬ 
stre. GETMEMCU determina la po¬ 
sizione del cursore nella finestra atti¬ 
va in quel momento. Questa routine 
viene usata in tutto l'I/O per la fine¬ 
stra. 

Per evitare di dover fare correzioni 
per le differenti configurazioni di 


computer sono state aggiunte sezio¬ 
ni di codice per identificare la confi¬ 
gurazione. Questo permette che lo 
stesso programma giri su tutti i mo¬ 
delli. Predisponendo registri di flag, 
le decisioni che dipendono dalla con¬ 
figurazione possono essere fatte nel 
modo più comodo possibile. I tipi 
di computer sono divisi in tre catego¬ 
rie: II Plus, Ile originale, e Ile oppu¬ 
re Ile enancement. Queste informa¬ 
zioni sono immagazzinate nel regi¬ 
stro interno IIC (linee 92-97). Se 
viene trovato che il computer è un 
Ile o un Ile viene controllata la sche¬ 
da 80 colonne (linea 102). Se la 
scheda 80 colonne è abilitata e visua¬ 
lizza 80 colonne la larghezza della 
riga viene cambiata per i calcoli (li¬ 
nee 103-104), con effetto sui calcoli 
del cursore di input. Se la scheda 80 
colonne è abilitata, ma visualizza so¬ 
lo 40 caratteri, c'è ugualmente effet¬ 
to sui calcoli del cursore. Infine il 
Ile potenziato e il Ile richiedono ulte¬ 
riori aggiustamenti del cursore quan¬ 
do è in funzione il firmware 80 co¬ 
lonne. Il cursore dell'input è gestito 
nelle linee 785-808. Per dare ai pro¬ 
grammi in Basic un aspetto incon¬ 
sueto e professionale ricorrete alle 
finestre. Troverete anche che Win¬ 
dow Magic offre routine di introdu¬ 
zione dei dati superiori a quelle del¬ 
l'Apple. 

- X 

Questo programma è disponibile 
su dischetto. L’elenco, i prezzi 
e le modalità d’ordine di questo 
e degli altri dischetti disponibili 
sono riportati nella rubrica 
Disk Service. 

\ J 


© By Nibble e Applicando 
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Ultimissime dalle banche dati 


Quello deH'informatica on-line è 
un settore in continua e rapida evolu¬ 
zione: a pochi mesi dal servizio sul¬ 
le telecomunicazioni, apparso su Ap¬ 
plicando numero 25, già giungono 
in redazione dati di aggiornamento, 
relativi a recapiti o addirittura a servi¬ 
zi svolti da banche dati e reti. 

Nella tabella pubblicata qui accan¬ 
to troverete tutti i dati, aggiornati al 
giugno 1986, relativi alle banche da¬ 
ti del servizio ESA-IRS (European 
Space Agency - Information Retrie- 
val Service), che opera a Frascati 
presso lo Esrin e viene utilizzato, 
oltre che dai paesi membri dell’Agen- 
zia Spaziale Europea, da molti uten¬ 
ti in altri continenti. 

Qui sotto, nei riquadri, gli aggior¬ 
namenti relativi ai recapiti del distri¬ 
butore internazionale ADP Net¬ 
works Services e della rete Infonet, 
oltre all’avviso di cessata attività 
della rete Euronet. 


La sede italiana di 
ADP NETWORKS SERVICES 
è stata trasferita 
in viale Monza 2 
a MILANO ‘ 
telefono 02 2871321 


La rete EURONET, gestita 
dal Ministero delle 
Poste e Telecomunicazioni, 
ha cessato la sua attività 


La rete INFONET 
è presente in Italia con tre sedi: 
MILANO, viale Lombroso 54 
telefono 02 54231 
ROMA, via Nicola Martelli 3 
telefono 06 879656 - 878261 
TORINO, corso Dante 42 
telefono Oli 6967533 


NAME 

MAIN SUBJECT AREA 

No. references 

Time span 

ABI/INFORM 

Management, economics 

303.000 

from 1971 lo present 

ABI/INFORM TRAINING 

Subset of ABI/INFORM 

11.000 

Nov 1980 and March 81 only 

ACID RAIN 

Pollution, environment 

1.200 

(rom 1984 to present 

ACOMPLINE 

Urban matters 

87.000 

trom 1973 lo present 

AEROSPACE DAILY 

Daily aerospace news 

9.000 

from 1983 to present 

AEROSPACE TERMS 

Space terms glossary 



AFEE 

Aquatic Sciences 

62.000 

trom 1970 to present 

AGRIS 

Agriculture 

920.000 

from 1975 to present 

AGRIS TRAINING 

Subset of AGRIS 



ALUMINUM 

Aluminum 

120.000 

trom 1968 to present 

ARTIFICIAL INTELLIGENCE 

Computer Sciences, robotics 

1.200 

from 1984 to present 

ASIAN GEOTECHNOLOGY 

Geotechnical engineering 

28.500 

from 1973 to present 

BIIPAM 

Metallurgy 

72.000 

from 1970 to present 

BIOSIS 

Biology 

3.800.000 

trom 1973 to present 

BNF 

Non-ferrous metals 

113.000 

Irom 1981 to present 

BRIX 

Building research 

116.000 

from 1950 to present 

BUSINESS SOFTWARE 

Business software 

5.800 

from 1983 to present 

CAB 

Agriculture 

1.850.000 

from 1973 to present 

CAB TRAINING 

Subset of CAB 


from Dee 1984 to May 1985 

CAD/CAM 

Computer aided engineering 

1.200 

from 1983 to present 

CETIM 

Engineering 

77.000 

from 1975 to present 

CHEMABS 

Chemistry 

7.135.000 

Irom 1967 lo present 

CHEMABS TRAINING 

Subset of CHEMABS 

67.000 


CHEMICAL ENGIN. ABS. 

Chemical engineering 

72.500 

from 1970 to present 

CIS-DOC 

Occupational Health and Safety 

24.600 

from 1973 to present 

COMPENDEX 

Engineering 

1 509.000 

from 1969 to present 

CONF. PAPER INDEX 

Conference proceedings 

1.113.000 

! 'from 1973 lo present 

CURRENT BIOTECH. ABS. 

Biotechnology 

12.700 

from 1983 to present 

DATALINE 

Company profiles 

3.000 

last 5 years 

DELFT HYDRO 

Hydrodynamics; aquatic environment 

51.000 

from 1977 to present 

EDF-DOC 

Electricity, energy 

319.000 

from 1972 to present 

EDIN 

INIS Training • Subset of INIS 



ELECTRONIC MAGAZINE 

Information Sciences 

561 

from 1984 lo present 

EMIS 

Materials for electronics 

10.000 

from 1982 to present 

ENEL 

Electricity (Italy) 

9.500 

from 1980 to present 

ENERGYLINE 

Energy 

86.000 

Irom 1971 to present 

ENVIROLINE 

Environment 

118.000 

Irom 1971 to present 

EUDISÈD 

Educational research projects 

4.900 

from 1975 to present 

FLUIDEX 

Fluid engineering 

169.000 

from 1969 to present 

FOOD SCI. & TECH. ABS. 

Food Sciences 

292.000 

from 1969 lo present 

HSELINE 

Health & safety 

73.000 

from 1977 to present 

IBSEDEX 

Building research 

25.000 

from 1979 to present 

INIS 

Nuclear Sciences 

800.000 

from 1975 to present 

INSPEC 

Electronics & computing 

2.400.000 

from 1971 to present 

INSPEC INFO. SCIENCE 

Information Sciences 

17.000 

from 1971 to present 

INSPEC TRAINING 

Subset of INSPEC 

45.000 

1977 only 

INT. PHARMACEUT. ABS. 

Drugs, pharmaceuL practice & educ. 

113.000 

from 19 l 70 to present 

INTIME 

Manufacturing automation 

9.000 

from 1974 to present 

IRRD 

Road engineering & transport 

190.000 

from 1972 to present 

ISMEC 

Mechanical engineering 

182.000 

from 1973 to present 

LABORAT. HAZ. BULL 

Chemical hazards 

4.000 

from 1981 to present 

LABORDOC 

Labour-related aspects 

125.000 

from 1965 to present 

LABOR INFO 

Labour 

6.300 

from 1974 io present 

LEDA 

Catalogue of remote sensing images 

200.000 

from 1975 to present 

MASSLIT 

Mass spectrometry 

150.000 

Irom 1966 to present 

MATHSCI 

Mathematics 

412.000 

from 1973 to present 

MERLINTECH 

Electrical & electronic engineering 

33.000 

from 1973 to present 

METADEX 

Metallurgy 

553.000 

from 1969 to present 

MOLARS 

Meteorology, climatology 

139.000 

from 197Ito present 

NASA 

Aerospace 

(access restncted to ESA member States) 

1.420.000 

from 1962 to present 

NEWSLINE 

Daily company news 

900/week 

last 5 days 

NEXTLINE 

Diary of forthcoming events 


current 

NTIS 

U.S. government reports 

1.115.000 

from 1962 to present 

OCEANIC 

Oceanography 

169.000 

from 1964 to .present- 

PACKABS 

Packaging technology 

12..600 

from 1981 to present 

PASCAL 

Multidisciplinary 

5.666.000 

from 1973 to present 

PASCAL TRAINING 

Subset of PASCAL 

48.000 

1976 to 1978 only 

POLLUTION 

Pollution 

117.000 

from 1970 to present 

PRICEDATA 

Commodities price quotations 

800 

from 1973 to 1984 

ROBOMATIX 

Robotics 

6.000 

from 1983 to present 

SATELDATA 

Satellite equipment parameters 

1.000 

from 1974 to present 

SPACECOMPS 

Components for spacecraft use 

11.000 

from 1970 to present 

SPACE PATENTS 

Space patents 

2.000 

from 1950 to present 

SPACESOFT 

Software in aerospace 

1.100 

current 

STANDARDS & SPECS. 

U.S. standards and specifications 

112.000 

from 1950 to present 

TELECOMMUNICATIONS 

Telecommunications 

2.000 

from 1983 lo present 

TELEGEN 

Bio-engineering 

14.000 

from 1976 to present 

TEXTLINE 

Daily company news 

200.000 

from 1980 to present 

TRANSDOC 

Transportation, economics, policy 

15.000 

from 1970 to present 

ULRICH’S PERIODICALS 

Periodicals 

131.000 

current 

WORLD REPORTER 

News & Newspapers 

500.000 

last 3-5 years 

WORLD REP. TRAINING 

Subset of WORLD REPORTER 



WORLD TRANS INDEX 

Translation announcements 

194.000 

from 1978 to present 
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" 1 ' OMNIS 3 

é un potentissimo generatore di programmi 
(Data Base Relazionale) 
interamente in lingua italiana 

alia portata di tutti. 

Con OMNIS 3 é possibile 

realizzare in breve tempo complesse applicazioni 
senza alcuna conoscenza dei linguaggi 
■ - d i prog rammazione. 


OMNIS 3 é disponibile per 

MACINTOSH, APPLE II e MSDOS, 
in versione mono e multiutente. 


OMNIS 3 é prodotto dalla 

BLITH SOFTWARE Ltd. 


Distribuito ed assistito 
in esciusiva in tutta ITALIA da: 


Via Chiapponi,42-29100 PIACENZA - Tel. 0523/20626 
Disponibile anche presso tutti i migliori APPLE CENTER . 


BASIC ? PASCAL ? 
LINGUAGGIO MACCHINA ? 

Basta con i linguaggi 
di programmazione!.. 


..orac'é 


OMNIS 3 


IL SOLO ED UNICO PROGRAMMA 
IN LINGUA ITALIANA 
DI CUI A VETE BISOGNO 


Questa pagina é stata realizzata con Macintosh da BUMP - Piacenza 




























Omnis 3 


Applicando n. 27 ha presentato ai lettori un program¬ 
ma eccezionale per rapporto prezzo-prestazioni: Omnis3. 

Per apprezzarlo appieno, in ogni numero questa nuova 
rubrica ne presenterà un'applicazione. 

Gestione di Contabilità Casalinga è un'applicazione 
molto utile per avere sempre sotto controllo l’andamento 
delle spese domestiche. Quando è stata caricata va scelta 
per prima, dal menù Contabilità domestica, la voce GE¬ 
STIONE: ancora non è stato creato l’archivio che conter¬ 
rà i futuri dati e bisogna tertanto approntarlo; quindi, do¬ 
po aver confermato su quale dischetto si vogliono carica¬ 
re, bisognerà introdurre i propri dati anagrafici: nome, in¬ 
dirizzo, località e telefono. 

Questo fa sì che a mano a mano che si caricano i mo¬ 
vimenti di contabilità, vengano sempre aggiornate le vo¬ 
ci relative al totale Entrate, al totale Uscite e al totale 
Saldo (figura 1). Con un clic sul bottone Riepilogo si 
potrà avere a video o in stampa il dettaglio dei movi¬ 
menti memorizzati. 

Si sceglie poi, sempre dal menù Contabilità domesti¬ 
ca, l'opzione DESCRIZIONI, in modo tale da codificare 
le varie voci di entrata o di uscita tipiche della contabili¬ 
tà casalinga (figura 2); come si può notare, vi sono dei 
bottoni sul lato sinistro: quelli relativi alle voci Ricerca, 
Inserisci, Modifica e Cancella hanno il significato intui¬ 


bile, mentre i due contrassegnati da « e da » permettono 
di sfogliare l'elenco delle descrizioni codificate e memo¬ 
rizzate in archivio. Da notare che esistono nella scheda 
le voci relative al totale del progressivo entrate o uscite, 
a seconda che la voce descritta sia un'entrata o un’uscita; 
totale progressivo che rimane memorizzato anche quando 
si esegue l'azzeramento periodico dell'archivio movi¬ 
menti. A questo punto si possono introdurre le movi¬ 
mentazioni di contabilità selezionando la voce OPERA¬ 
ZIONI dal menù: anche qui vi è una serie di bottoni che 
permettono operazioni ben intuibili. Nel caricamento di 
una nuova operazione, che si ottiene facendo clic sul bot¬ 
tone Inserisci, viene proposta in automatico la data del 
sistema, poi viene richiesto il codice relativo alla descri¬ 
zione dell'operazione da caricare e infine l’importo ed 
eventuali note che accompagnano l'operazione. 

Infine le due ultime voci presenti nel menù Contabili¬ 
tà domestica sono: STAMPA ESTRATTO CONTO, 
che ovviamente permette di eseguire le stampe dei movi¬ 
menti, con i relativi totali e saldo generale, ordinati in 
ordine crescente per data (figura 3), e AZZERAMEN¬ 
TO, la cui esecuzione alla fine di ogni mese o trimestre 
permette di ottenere la stampa delfestratto conto e l'azze- 
ramento dell'archivio delle operazioni dei movimenti di 
contabilità (figura 4). 
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OmnlsS 

,M - Gestione della contabilità domestica 




Home 

Indirizzo 
Locai 11 à 

ALFONSO SCOFPETTA 

U1 RLE nOHZfl m 

20128 niLANO hi 





Telefono 

02/22.33.11 









[ Esci ) 


Entrate 
Use ite 
Saldo 

3000000 [ Dare ] 
1150000 [ Aver* ] 
1850000 [ Saldo ] 



[Riepilogo] 
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Figura 1. 



Figura 3. 


é Archivio Componi Contabilità domestico 


i Descrizioni Ucci di Entrnto/llvcita j 
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0mnis3™ - Gestione della contabilità domestica 


Codice 

1 Tipo [E-U] E 

Oescr i z i one. 

STIPEN0I0 

Progressiuo Entrate 

5000000 

Progressivo Useite 

0 


Digitare [voce TIPO] E per Entrata 
U per Uscita 


( Ricerca 


Cancella] 


O 



Figura 2. 


é Rrchiiiio Componi Contabilita domestica 


i Azzeramento i 


Eseguendo questa operazione alla fine di ogni 
Trimestre si ottiene la stampa dell' Estratto 
Conto e l'azzeramento del I’archlulo delle ope¬ 
razioni . 

E' bene .comunque .eseguire una copia del fi¬ 
le "Contab/Domest I .Dot i'* 


Premere ESEGUI per Iniziare la procedura 
oppure ESCI per annullarla 


ESCI 1 


Esegui 


Figura 4. 
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GRAFICA 



L'animazione delle figure a blocco consente di muoversi senza sfarfallio at¬ 
traverso lo schermo, ma come far contorcere la figura mentre si sposta? Ec¬ 
co i trucchi per l'animazione a prespostamento, che permette appunto di ot¬ 
tenere lo spettacolare effetto. 


L’attacco 
degli squirm 


Questa puntata sull'animazione 
grafica sarà probabilmente la miglio¬ 
re fin qui vista nella serie. Prima pe¬ 
rò diamo un rapido sguardo ai vari ti¬ 
pi e metodi di animazione finora esa¬ 
minati, ognuno con i suoi punti for¬ 
ti e i suoi punti deboli. 

1. La forma più basilare di anima¬ 
zione è il vecchio metodo che cancel- 
la-muove-disegna, ed è probabilmen¬ 
te il primo tipo che avete sperimen¬ 
tato. Funziona bene, ma per cancella¬ 
re (erase) è necessario tener nota del¬ 
la vecchia posizione della figura, e 
di solito si vedrà uno sfarfallio non 
indifferente, perché la figura è sullo 
schermo solo per la metà del tempo. 

2. Per superare il problema dello 
sfarfallio abbiamo poi esaminato l'a¬ 
nimazione a scambio di pagina, con 
l'intento di evitare che l'osservatore 
abbia mai a vedere la figura nel suo 


Listatol. Block Squirms-5 
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stato di cancellazione. Si è trattato 
di un grande miglioramento, in quan¬ 
to le figure hanno preso a muoversi 
con molta scorrevolezza sullo scher¬ 
mo. Il problema principale era costi¬ 
tuito dalla necessità di usare entram¬ 
bi gli schermi Hi-Res, con una con¬ 
seguente riduzione di 8K del quantita¬ 
tivo di memoria disponibile per le fi¬ 
gure e i programmi. I risultati erano 
sì migliori, ma i programmi girava¬ 
no più lentamente in quanto era ne¬ 
cessario fare tutte le operazioni di di¬ 
segno (DRAW) due volte, una su 
ciascuna pagina. 

3. Usando lo spostamento orizzon¬ 
tale dei bit e lo spostamento vertica¬ 
le dei byte abbiamo cominciato a rea¬ 
lizzare routine che non solo girava¬ 
no uniformemente senza sfarfallare, 
ma potevano anche lavorare veloce¬ 
mente, in quanto non era richiesta al¬ 


cuna operazione di cancellazione. 
Utilizzando questi metodi siamo sta¬ 
ti nuovamente in grado di usare una 
sola pagina Hi-Res. A questo punto 
sembrava che avessimo finalmente 
ottenuto i migliori metodi di anima¬ 
zione possibili. 

In effetti ognuno dei metodi sopra 
descritti ha i suoi vantaggi, e scopri¬ 
rete probabilmente che uno di essi ri¬ 
solverà quasi tutti i problemi di ani¬ 
mazione che incontrerete. Ma hanno, 
tutti un importante punto di debolez¬ 
za: trattano solo figure statiche. Di¬ 
sponiamo magari di maniere efficaci 
per far muovere le nostre figure, ma 
la figura non cambierà mai mentre 
la spostiamo sullo schermo. 

Si presenta quindi un altro proble¬ 
ma: come muovere e animare le no¬ 
stre figure nello stesso tempo? Un 
possibile esempio è quello di un uo- 
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mo che cammina attraverso lo scher¬ 
mo facendo rimbalzare una palla, op¬ 
pure di un’astronave con luci lampeg¬ 
gianti che si sposta sullo schermo. 
Nessuno dei metodi che abbiamo fin 
qui studiato offre il modo concreto 
di ottenere questo tipo di animazio¬ 
ne, il tipo che ci accingiamo appun¬ 
to a esaminare. 

Per meglio comprendere la tecnica 
sarà bene utilizzare, come esempio 
pratico, una routine dal nome 
"squirm attack”. Gli squirm sono es¬ 
seri agitati, che, come implica il lo¬ 
ro nome, adorano andarsene in giro 
dimenandosi e agitando in continua¬ 
zione la lunga coda. Dato che sono 
anche molto aggressivi aprono e 
chiudono senza posa la bocca, cercan¬ 
do qualcosa di gustoso da rosicchia¬ 
re. In figura 1 potete dare loro una 
prima occhiata. Lavorando con le fi¬ 
gure prespostate impiegheremo e- 
sclusivamente la routine di figure a 
blocco DRAW. Definendo con esat¬ 
tezza le figure non avremo mai biso¬ 
gno di cancellarle con ERASE duran¬ 
te l'animazione. Normalmente, quan¬ 
do lavoreremo con le figure prespo¬ 
state, disabiliteremo la funzione 
EOR della routine DRAW. 

Le figure sono descritte nella tavo¬ 
la delle figure (listato 1) BLO- 
CK/SQUIRMS-5, una tavola delle 


figure a blocco di 14 figure che deve 
essere introdotta in memoria a parti¬ 
re dall’indirizzo $8000. Salvate que¬ 
sto file sul dischetto con: 


BSAVE BLOCK/SQUIRMS-5, 
A$8000,L$200. 


Come funzionano 
le figure prespostate 

Per avere un'idea del funzionamen¬ 
to di questo metodo di movimento e 
di animazione delle figure osservate 
la figura 1: ognuna di esse è larga 
21 bit (punti), ossia 3 byte; è dise¬ 
gnata però in un riquadro largo 4 
byte. Notate anche che ci sono due 
gruppi completi di figure: uno è de¬ 
nominato a movimento orizzontale 
e l’altro a movimento verticale. Esa¬ 
miniamo per prime quelle dette a 
movimento orizzontale. 

Ogni figura della progressione è 
mossa di una posizione a destra ri¬ 
spetto alla precedente. L'intero con¬ 
cetto delle figure prespostate è mol¬ 
to semplice: se dovessimo disegnare 
(DRAW) per prima la figura 1 e poi 
in successione ognuna delle diverse 
figure, fino alla figura 7 compresa, 
alle stesse posizioni HR e HL, la fi¬ 
gura darebbe l'impressione di muo¬ 


Listato 2. T5 Test 

DOS 3.3 



1 REM - 

2 REM T5 TEST 

3 REM DI ROBERT DEVINE 

4 REM COPYRIGHT (C) 1986 

Apple Ile 

Apple Ile 


5 REM BY APPLICANDO & 

6 REM MICROSPARC, INC 

7 REM - 

8 TEXT : HOME 

9 VTAB 12: PRINT " (C) 1986 BY APPLICANDO & MICROSPARC" 

10 PRINT CHR$ (4)"BLOAD BLOCK ROUTINES": CALL 37799 

15 PRINT CHRS (4)"BLOAD BLOCK/SQUIRMS-5" 

16 PRINT CHRS (4)"BLOAD T5.0BJ" 

20 FOR X = 33280 TO 33311: POKE X,l: NEXT : REM Imposta i punta 
tori di stato a $8200 

30 POKE 37696,234: POKE 37697,234: REM Disattiva la funzione EO 
R di DRAW 

100 POKE 251,128: HOME : HGR :X = PEEK (49234) 

190 POKE 43,30: REM Imposta TOPLMT (Colonne 1 e 3 cominciano a 
Y=30) 

200 CALL 20480: REM Disegna con DRAW gli Squirm alle posizioni 
iniziali 

210 ON ( INT ( RND (1) * 9) + 1) GOSUB 300,300,300,300,310,320,32 

0,320,320: REM IN SU, A DESTRA, IN GIU' 

230 GOTO 210 

300 IF PEEK (43) < = 16 THEN 322: REM Test TOPLMT per muovere 

in su 

302 POKE 251,129: REM Imposta figure NON spostate 
305 POKE 235,1: CALL 20502: RETURN : REM Muove in su 

310 GOSUB 400: POKE 251,128: REM Imposta figure spostate 

315 POKE 235,0: CALL 20502: RETURN : REM Muove a destra —> 

320 IF PEEK (43) > = 44 THEN 302: REM Test TOPLMT per muovere 

in giù 

322 POKE 251,129: REM Imposta figure NON spostate 
325 POKE 235,2: CALL 20502: RETURN : REM Muove in giù 

400 IF PEEK (26) > = 39 THEN POP : POP : GOTO 100: REM All'o 

rio destro dello schermo-ricomincia da capo 
405 RETURN 


versi a destra di sette punti. In quel 
momento sarebbe completamente 
spostata all'orlo destro dei byte di fi¬ 
gura, con un byte vuoto dietro. Sa¬ 
remmo allora pronti, come nell'ani¬ 
mazione a spostamento, a incremen¬ 
tare HR e HL. Avendo adesso di nuo¬ 
vo un byte vuoto davanti alla nostra 
figura potremmo ripetere i passi dal¬ 
la figura 1 alla 7 e portarci avanti di 
altri sette punti. 

Dato che agendo così abbiamo can¬ 
cellato automaticamente a mano a 
mano che avanzavamo, non dovre¬ 
mo mai preoccuparci di un problema 
di cancellazione, possibile causa di 
sfarfallio. Lo schema è molto chia¬ 
ro: ogni volta che si è completato il 
passaggio per tutte le sette figure è 
il momento di incrementare nuova¬ 
mente HR e HL. Tutto qui. 

La grande differenza fra il metodo 
a prespostamento e l’animazione a 
spostamento è che disegnando ogni 
nuova figura della serie non soltan¬ 
to avanziamo ma, dato che ogni figu¬ 
ra è un po’ diversa, causiamo anche 
un cambiamento della figura mentre 
si sposta. Nell'esempio degli squirm 
la coda si agita in su e in giù quando 
essi si muovono, e la bocca si apre 
e si chiude. 

Se poi volete usare figure che con¬ 
tengono il colore, i colori cambieran¬ 
no ogni volta, ma unicamente se vi 
muovete di un solo punto per figu¬ 
ra. Quando si lavora con figure che 
contengono qualche punto colorato 
l’accorgimento consiste semplice- 
mente nell’aggiungere due byte vuo¬ 
ti davanti alla figura, mostrare ognu¬ 
na delle sette figure della serie spo¬ 
stata di due punti rispetto alla figura 
precedente e incrementare HR e HL 
due volte dopo ogni serie di figure. 

Il risultato è che i colori resteran¬ 
no costanti e ogni serie farà avanzare 
la figura di 14 punti. 

Esecuzione del demo 

Nel nostro test animeremo sullo 
schermo 20 figure, facendole muove¬ 
re, in su, in giù o in avanti, in un 
costante stato di attività, mentre si 
agitano. Non le sposteremo in diago¬ 
nale, ma spiegheremo come lo si 
può fare. 

Esaminiamo dapprima la figura 
2 per vedere come disporre le figure. 
Ci saranno, tre colonne di squirm, 
con sette figure in ciascuna delle co¬ 
lonne 1 e 3 e sei figure nella colon¬ 
na 2. 
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Il valore di VT per ogni figura sa- immediatamente soprastante. Dei va¬ 
ra in relazione con una variabile de- lori di HR e HL per ciascuna-colon- 
nominata TOPLMT (per TOP LI- na terranno nota le variabili FR 
MIT: limite superiore), con ogni fi- (Front Right: davanti a destra), FL 
gura situata 20 punti sotto la figura (Front Left: davanti a sinistra), MR 
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Figura 1. Funzionamento del movimento. 


lo applico, 
tu applichi? 


La pubblicità su 
Applicando è informazione. 
Chi legge Applicando 
possiede un computer 
Apple o sta per cambiarlo 
con un Apple//e. 

Ocon un Apple Ile. 

O con un Macintosh. 
Oppure non lo cambia 
affatto, se lo tiene stretto, 
ma vuol sapere dove, 
come e cosa fa 
veramente per lui. 

Una nuova marca 
di dischetti? 

Una nuova 
Software House? 

Una nuova stampante 
a basso prezzo? 

Per chi applica, 
è importante saperlo. 
Subito. 


STUDIOSFERA 
sas di Berardo & C 
1" Strada 24 - Milano S. Fe 
lice - 20090 Segrate MI - te 
letono 02/ 7533939 - 7532151 
telex 350132 MACORM-C.F. e 
. P. Iva 0701483015 7-C.C.IAA. 
Milano 1132820 - Tribunale 
Milano Reg. Soc. n 64797 
Banca Popolare di 
M ilano Ag. 17 


Per la pubblicità 
studibsfero sas 

telefono 02/ 7533939 - 7532151 
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Listato 3. T5.0BJ 

DOS 3.3 

- NEXT OBJECT FILE NAME IS T5.0BJ 

5000: 1 ORG $5000 

932F: 2 DRAW EQU $932F 


Apple Ile 

Apple Ile 


9330: 3 SHPLO EQU $9330 


001A: 



4 FR 

EQU 

$1A 


001B: 



5 FL 

EQU 

$1B 


001C: 



6 MR 

EQU 

$1C 


001E: 



7 ML 

EQU 

$1E 


00D6 : 



8 BR 

EQU 

$D6 


00D7 : 



9 BL 

EQU 

$D7 


00FB: 



10 SHNUM 

EQU 

$FB 


00FC : 



11 VT 

EQU 

$FC 


00FD: 



12 VB 

EQU 

$FD 


00FE : 



13 HR 

EQU 

$FE 


00FF : 



14 HL 

EQU 

$FF 


0019: 



15 LOOP 

EQU 

$19 


002B: 



16 TOPLMT 

EQU 

$2B 


0007: 



17 BTMLMT 

EQU 

$07 


8200: 



18 STATUS 

EQU 

$8200 


0022: 



19 X 

EQU 

$22 


00EB: 



20 DPTR 

EQU 

$EB 


5000 :A9 

09 


21 START 

LDA 

#9 

FIRST DRAW ENTRY 

5002:85 

1A 


22 

STA 

FR 


5004 :A9 

06 


23 

LDA 

# 6 ; 

SET ALL 

5006:85 

1B 


24 

STA 

FL 


5008:85 

1C 


25 

STA 

MR 

STARTING 

500A:A9 

03 


26 

LDA 

#3 


500C : 85 

1E 


27 

STA 

ML 

HR'S AND HL'S 

500E:85 

D6 


28 

STA 

BR 


5010 :A9 

00 


29 

LDA 

#0 

FOR SQUIRMS 

5012:85 

D7 


30 

STA 

BL 


5014:85 

EB 


31 

STA 

DPTR 

SET DIRECTION —> 

5016 :A9 

20 


32 L205 

LDA 

#$20 

NORMAL DRAW 

5018:8D 

30 

93 

33 

STA 

SHPLO 

SET STARTING SHAPE 

501B:A4 

EB 


34 

LDY 

DPTR 

MOVING —> ? 

501D:F0 

06 


35 

BEQ 

L220 

YES-JUMP 

501F:C6 

1A 


36 

DEC 

FR 

REMOVE THE 

5021 :C6 

1C 


37 

DEC 

MR 

SHIFTING 

5023 :C6 

D6 


38 

DEC 

BR 

BYTES. 

5025 :A2 

01 


39 L220 

LDX 

#1 

POINT TO 

5027:86 

22 


40 

STX 

X 

FIRST SQUIRM. 

502 9 :A5 

1A 


41 

LDA 

FR 

GET ITS HR 

502B:85 

FE 


42 

STA 

HR 

STORE IT 

502D:A5 

1B 


43 

LDA 

FL 

GET ITS,HL 

502F: 85 

FF 


44 

STA 

HL 

STORE IT 

5031 :A5 

2B 


45 

LDA 

TOPLMT 

FIND TOPLIMIT 

5033:18 



46 

CLC 



5034:69 

8€ 


47 

ADC 

#140 j 

: ADD OFFSET 

5036:85 

07 


48 

STA 

BTMLMT ; 

r SET BOTTOMLIMIT 

5038 :A5 

2B 


49 

LDA 

TOPLMT j 

r GET TOPLIMIT 

503A:85 

19 


50 

STA 

LOOP j 

? SET VT POINTER 

503C: 85 

FC 


51 J1 

STA 

VT j 

r SET CURRENT VT 

503E:18 



52 

CLC 



503F:69 

06 


53 

ADC 

# 6 

ADD OFFSET 

5041:85 

FD 


54 

STA 

VB“ 

SET VB 

5043-.A6 

22 


55 

LDX 

X 

GET SQUIRM POINTER 

504 5 :BD 

00 

82 

56 

LDA 

STATUS,X 

IS SQUIRM DEAD? 

5048 :F0 

03 


57 

BEQ 

J4 

YES-ABORT DRAW 

504A:20 

2F 

93 

58 ZI 

JSR 

DRAW 

DRAW SQUIRM 

504D:E6 

22 


59 J4 

INC 

X 

NEXT SQUIRM 

504F:A5 

19 


60 

LDA 

LOOP 

GET VT POINTER 

5051:18 



61 

CLC 



5052:69 

14 


62 

ADC 

#20 

ADD OFFSET 

5054:85 

19 


63 

STA 

LOOP 

RESET VT POINTER 

505 6 :C5 

07 


64 

CMP 

BTMLMT 

COLUMN DONE ? 

5058:90 

E2 


65 

BCC 

J1 

NO-NEXT SQUIRM 

505A:A5 

1C 


66 L230 

LDA 

MR 

GET MIDDLE HR 

505C:85 

FE 


67 

STA 

HR 

STORE IT 

505E-.A5 

1E 


68 

LDA 

ML 

GET MIDDLE HL 

5060:85 

FF 


69 

STA 

HL 

STORE IT 

5062 :A5 

2B 


70 

LDA 

TOPLMT 

GET TOPLIMIT 

5064:18 



71 

CLC 



5065:69 

78 


72 

ADC 

#120 

; ADD OFFSET 

5067:85 

07 


73 

STA 

BTMLMT 

; SET BOTTOMLIMIT 

5069 :A5 

2B 


74 

LDA 

TOPLMT 

? GET TOPLIMIT 

506B:18 



75 

CLC 



506C:69 

0A 


76 

ADC 

#10 

; ADD OFFSET 

506E:85 

19 


77 

STA 

LOOP 

: SET VT POINTER 

5070:85 

FC 


78 J2 

STA 

VT 

; SET CURRENT VT 

5072:18 



79 

CLC 



5073:69 

06 


80 

ADC 

#6 

ADD OFFSET 

5075:85 

FD 


81 

STA 

VB 

SET VB 

5077 :A6 

22 


82 

LDX 

X 

GET SQUIRM POINTER 

507 9 :BD 

00 

82 

83 

LDA 

STATUS,X 

IS IT DEAD ? 

507C:F0 

03 


84 

BEQ 

J5 

YES, ABORT DRAW 

507E:20 

2F 

93 

85 Z2 

JSR 

DRAW 

DRAW SQUIRM 

5081 :E6 

22 


8 6 J5 

INC 

X 

NEXT squirm (Continua) 


(Middle Right: centro destra), ML 
(Middle Left: centro sinistra) e via 
dicendo. 

Utilizzeremo anche una variabile 
chiamata X che terrà nota dello spe¬ 
cifico squirm con cui stiamo trattan¬ 
do (1-20), in modo che possiamo 
controllare lo stato di ogni squirm 
per stabilire se è stato distrutto (in 
realtà non distruggeremo gli squirm, 
ma si tratta di una parte di ciò che fa¬ 
rà il programma ultimato). 

Dedichiamo adesso qualche istante 
alfintroduzione dei listati necessari. 

Listato 1 - occorre andare in 
Monitor, con CALL-151 e introdurre 
in memoria i codici .esadecimali a 
partire dalla locazione $8000. Termi¬ 
nata l'introduzione salvate con: 
BSAVE BLOCK/SQUIRMS-5, 
A$8000,L$200. 

Listato 2 - Per questo listato 
non dovrebbero esserci problemi es¬ 
sendo in Applesoft. Una volta intro¬ 
dotto in memoria, salvatelo con: 
S AVE T5 TEST. 

Listato 3 - Chi è in possesso 
del Tool Kit" Assembler, può copia¬ 
re interamente il listato 3 e farlo as¬ 
semblare. In mancanza di questo, an¬ 
date in Monitor con il comando 
CALL-151, battete 5000 seguito da 
due punti, e copiate i codici compre¬ 
si tra i numeri indicanti la locazione 
di memoria e la numerazione pro¬ 
gressiva. Al termine salvate con: 
BSAVE T5.0BJ;A$5000,L$F2. 

Listato 5 - Questo listato è lo 
stesso usato nell'esercitazione grafi¬ 
ca del numero precedente di Appli¬ 
cando con raggiunta di poche righe 
di dati. Ecco come procedere: carica¬ 
te in memoria con BLOAD 
BLOCK ROUTINES pubblicata sul 
N. 28 a pag.89 (Listato 11), andate 
in Monitor con CALL-151 quindi 
scrivete 90AA: A5 FD C9 e così di 
seguito i codici esadecimali del li¬ 
stato 4. Terminata la copiatura, e 
premuto RETURN, scrivete 95FF: 
20 3A 3E 22 26 2A 2E 32 quindi 
salvate l'intera routine con: 

BSAVE BLOCK ROUTINES, 
A$90AA,L$5BD. 

A questo punto potete dare il 
RUN al programma T5 TEST e ve¬ 
drete gli squirm muoversi. 

Come funziona 
il programma 

Ora che avete passato un po' di 
tempo a osservare tutta l'attività sul¬ 
lo schermo vediamo come funziona 
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^-Q ' 7 

come si presenta lo schermo 
dopo i primi 7 spostamenti 
in avanti, immediatamente 
prima che siano incrementati 
FR,FL,MR.ML.BR E BL 



(valori iniziali) 

TOPLMT 
(comincia a 30) 

TOPLMT+ 10 

TOPLMT+ 20 


'IO 


£ b 

BTMLMT = TOPLMT+100 

(colonna centrale) 

BTMLMT = TOPLMT+120 
/'"'Tw (colonne 

anteriore/posteriore) 


Figura 2. Come disporre le figure. 


l'insieme, cominciando con il pro¬ 
gramma di chiamata in Applesoft. 

Le linee 5-16 dovrebbero essere 
ben chiare e quindi non occorre occu¬ 
parsene. 

La linea 20 imposta su 1 tutti i 
byte della tavola di stato dello 
squirm. In realtà non useremo nel 
test la tavola di stato, ma prima di 
ogni operazione DRAW la routine 
in codice macchina controllerà la ta¬ 
vola per vedere se uno squirm sia sta¬ 
to distrutto. Se, per esempio, dove¬ 
ste impostare su zero il quarto indi¬ 
rizzo della tavola ($8204) trovereste 
lo squirm numero 4 eliminato dallo 
schermo. 

La linea 30 disabilita la funzione 
EOR di DRAW, che è quello che fa¬ 
reste normalmente lavorando con fi¬ 
gure prespostate. 

La linea 100 imposta SHNUM 
uguale al valore del byte alto della 
pagina di memoria in cui sono situa¬ 
te le figure (prespostate) a movimen¬ 
to orizzontale ($8000), e pulisce lo 
schermo Hi-Res. 

La linea 190 scrive con POKE il 
valore di TOPLMT nell'indirizzo 43 
($2B) per l’utilizzo da parte del codi¬ 
ce in linguaggio macchina. Noterete 
in figura 2 che la colonia di squirm 
comincia sempre dal VT della riga 
più alta di figure a Y=30. 

La linea 200 fa la prima chiamata 
alla routine in codice macchina. Que¬ 
sta chiamata imposta gli appropriati 
valori iniziali di HR e HL per ciascu¬ 
na colonna, imposta la prima direzio¬ 
ne di movimento in avanti e fa avan¬ 
zare la figura di sette punti. 

La linea 210 sceglie il movimento 
casuale delle figure mentre si muovo¬ 
no sullo schermo. Per rallentare la 
loro avanzata (ossia per tenerle più a 
lungo sullo schermo) avanzeremo so¬ 
lo per un nono del tempo. 

La linea 300 è l’inizio della nostra 
subroutine di movimento in su (MO¬ 
VE UP). Anzitutto, all’indirizzo 43 
($2B) viene controllato TOPLMT 
per impedire il movimento in avanti 
oltre VT=16. Se siamo già all'altez¬ 
za massima che vogliamo raggiunge¬ 
re viene fatto un salto a linea 322 
perché il movimento avvenga invece 
verso il basso. 

La linea 302 imposta SHNUM 
per le figure a movimento verticale 
che cominciano a $8100. Guardando 
la figura 1 vedrete che mentre ognu¬ 
na di queste figure è identica alla cor¬ 
rispondente figura a movimento oriz¬ 
zontale, nessuna è prespostata, e 


ognuna è larga solo tre byte. Dato 
che le figure si muovono solo in su 
o in giù non abbiamo bisogno che 
si muovano in avanti mentre percor¬ 
riamo passo passo la serie. Facendo¬ 
le larghe solo tre byte rendiamo an¬ 
che più veloce del 25% lavoro esecu¬ 
zione. 

Un'ultima cosa che dovreste notare 
a proposito delle figure è che ognu¬ 
na di esse ha una riga supplementare 
di byte vuoti sopra e sotto i byte del¬ 


la figura vera e propria. Questo ser¬ 
ve allo stesso scopo delle righe sup¬ 
plementari di byte utilizzate nelle 
routine di spostamento (SHEFT) ver¬ 
ticale, e provvede a cancellare la vec¬ 
chia figura mentre ci muoviamo. 

Dato il modo in cui è scritta la - 
routine basta fare POKE SHNUM 
con il numero di pagina (byte alto) 
ove si trovano le figure. Disponendo 
a dovere la serie di figure su ciascu¬ 
na pagina di memoria possiamo far 
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5083 :A5 

19 


87 


LDA 

LOOP 

5085:18 



88 


CLC 


5086:69 

14 


89 


ADC 

#20 

5088:85 

19 


90 


STA 

LOOP 

508A:C5 

07 


91 


CMP 

BTMLMT 

508C: 90 

E2 


92 


BCC 

J2 

508E:A5 

D6 


93 

L24 0 

LDA 

BR 

5090:85 

FE 


94 


STA 

HR 

5092:A5 

D7 


95 


LDA 

BL 

5094:85 

FF 


96 


STA 

HL 

50 96 :A5 

2B 


97 


LDA 

TOPLMT 

5098:18 



98 


CLC 


5099:69 

8C 


99 


ADC 

#140 

50 9B: 8 5 

07 


100 


STA 

BTMLMT 

50 9D:A5 

2B 


101 


LDA 

TOPLMT 

50 9F: 8 5 

19 


102 


STA 

LOOP 

50A1:85 

FC 


103 

J3 

STA 

VT 

50A3:18 



104 


CLC 


50A4: 69 

06 


105 


ADC 

#6 

50A6:85 

FD 


106 


STA 

VB 

50A8:A6 

22 


107 


LDX 

X 

50AA:BD 

00 

82 

108 


LDA 

STATUS, 

50AD:F0 

03 


109 


BEQ 

J6 

50AF: 20 

2F 

93 

110 

Z3 

JSR 

DRAW 

<50B2:E6 

22 


111 

J6 

INC 

X 

50B4:A5 

19 


112 


LDA 

LOOP 

50B6:18 



113 


CLC 


50B7:69 

14 


114 


ADC 

#20 

50B9:85 

19 


115 


STA 

LOOP 

50BB:C5 

07 


116 


CMP 

BTMLMT 

50BD: 90 

E2 


117 


BCC 

J3 

50BF:AD 

30 

93 

118 

L250 

LDA 

SHPLO 

50C2:C9 

E0 


119 


CMP 

#3E0 

50C4:F0 

17 


120 


BEQ 

L260 

50C6:18 



121 


CLC 


50C7:69 

20 


122 


ADC 

#$20 

50C9:8D 

30 

93 

123 


STA 

SHPLO 

50CC:A5 

EB 


124 


LDA 

DPTR 

50CE:F0 

0A 


125 


BEQ 

J8 

50D0:C9 

01 


126 


CMP 

# 1 

50D2: DO 

04 


127 


BNE 

J9 

50D4:C6 

2B 


128 


DEC 

TOPLMT 

50D6:D0 

02 


129 


BNE 

J8 

50D8:E6 

2B 


130 

J9 

INC 

TOPLMT 

50DA:4C 

25 

50 

131 

J8 

JMP 

L220 

50DD:A5 

EB 


132 

L260 

LDA 

DPTR 

50DF: DO 

06 


133 


BNE 

J10 

50E1:E6 

1B 


134 


INC 

FL 

50E3-.E6 

1E 


135 


INC 

ML 

50E5:E6 

D7 


136 


INC 

BL 

50E7:E6 

1A 


137 

J10 

INC 

FR 

50E9:E6 

1C 


138 


INC 

MR 

50£B:E6 

D6~ 

—. 

139 


INC 

BR 

50ED:A9 

00 


140 


LDA 

#0 

50EF:8D 

30 

93 

141 


STA 

SHPLO 

50F2: 60 



142 


RTS 



*** SUCCESSFUL ASSEMBLY: NO ERRORS 


Listato 4 - Va aggiunto 
all'inizio di Block Routines 


90AA.9119 


90AA- 

A5 

FD 

C9 

BD 

BO 

2F 



90B0- 

85 

06 

20 

91 

93 

A4 

FE 

B1 

90B8- 

26 

05 

F9 

20 

04 

F5 

A5 

F9 

90C0- 

91 

26 

20 

D5 

F4 

88 

18 

CO 

90C8- 

FF 

F0 

04 

C4 

FF 

B0 

E8 

C6 

90D0- 

06 

A5 

06 

C9 

FF 

F0 

04 

C5 

90D8- 

FC 

B0 

D7 

E6 

FC 

E6 

FD 

60 

90E0- 

A5 

FC 

C9 

01 

90 

33 

E6 

FD 

90E8- 

85 

06 

20 

91 

93 

A4 

FE 

B1 

90F0- 

26 

85 

F9 

20 

D5 

F 4 

A5 

F 9 

90F8- 

91 

26 

20 

04 

F5 

88 

18 

CO 

9100- 

FF 

F0 

04 

C4 

FF 

B0 

E8 

E6 

9108- 

06 

A5 

06 

C9 

BE 

F0 

04 

C5 

9110- 

FD 

90 

D7 

C6 

FD 

C6 

FD 

C6 

9118- 

FC 

60 








; GET VT POINTER 

; ADD OFFSET 
; SET NEXT VT 
; COLUMN DONE ? 

; NO-NEXT SQUIRM 
; GET BACK HR 
; STORE IT 
; GET BACK HL 
; STORE IT 
; GET TOPLIMIT 

; ADD OFFSET 
; SET BOTTOMLIMIT 
; GET TOPLIMIT 
; SET VT POINTER 
; SET CURRENT VT 

; ADD OFFSET 
; SET VB 

; GET SQUIRM POINTER 
X r IS IT DEAD ? 

; YES-ABORT DRAW 
; DRAW SQUIRM 
; NEXT SQUIRM 
; GET VT POINTER 

; ADD OFFSET 
; SET NEXT VT 
; COLUMN DONE ? 

; NO-NEXT SQUIRM 
; GET SHAPE POINTER 
; DONE SHAPE 7 ? 

; YES-WE'RE DONE 

; SET NEXT SHAPE 
; STORE IT 
; MOVING —> ? 

; YES-JUMP 
; MOVING UP ? 

; NO-JUMP 

; MOVE ALL UP 1 LINE 
; JUMP 

; MOVE ALL DOWN 1 LINE 
; AGAIN WITH NEXT SHAPE 
; GET DIRECTION POINTER 
; IF UP OR DOWN-JUMP 
; MOVE ALL HL'S 
; RIGHTWARD 
; 1 BYTE 
; MOVE ALL HR'S 
; RIGHTWARD 
; 1 BYTE 
; RESTORE DRAW 
; TO LDA #$0 
;SHAPE MOVED 7 DOTS 


Checksum listato 3 

APPLE CHECKER 3.0 
NOME FILE: T5.0BJ 
TIPO: B 

LUNGHEZZA: 00F3 
CHECKSUM : 43 


sì che sia la routine in codice mac¬ 
china a occuparsi di assegnare l’op- 
portuno valore d'indirizzo del byte 
basso della figura. 

La linea 305 imposta la direzione 
di movimento voluta e chiama la 
routine in linguaggio macchina, che 
anima le nostre figure sullo scher¬ 
mo. L'indirizzo 235 ($EB) è il pun¬ 
to in cui immagazziniamo DPTR 
(Direction PoinTer, puntatore di dire¬ 
zione); 0=muovere a destra, Smuo¬ 
vere in su e 2=muovere in giù. 

Le linee 310 e 315 funzionano co¬ 
me le linee 300-305, con la differen¬ 
za che prima andiamo a linea 400 
(GOSUB 400) per testare il presente 


valore di FR (Front row, Rightmost 
byte: colonna anteriore, byte più a 
destra) per vedere se possiamo anco¬ 
ra avanzare restando sullo schermo. 
Se abbiamo raggiunto l'orlo destro 
dello schermo i due GOSUB che ci 
hanno portati lì vengono cancellati e 
saltiamo a linea 100 per ricomincia¬ 
re tutto da capo. 

Le linee 320-325 funzionano co¬ 
me le linee 300-305, testando fino a 
che punto si può scendere e impo¬ 
stando le figure a movimento vertica¬ 
le e la direzione di viaggio. 

Quanto alla routine T5.0BJ, è do¬ 
tata di abbondanti commenti. Esami¬ 
neremo comunque le sue parti più 
importanti in modo che possiate ve¬ 
dere come un'unica routine possa 
far muovere le figure in una qualsia¬ 
si di tre direzioni selezionate. 

Notate anzitutto il modo in cui ab¬ 
biamo disposto in memoria le no¬ 
stre tavole delle figure: in entrambi i 
gruppi di figure la prima è in loca¬ 
zione a $SHNUM(20), con ogni fi¬ 
gura successiva $20 byte più in su 
della precedente, e l'ultima figura di 
ciascuna tavola a $SHNUM(E0). 
Pertanto per trovare l'indirizzo di 
ogni figura successiva non dobbia¬ 
mo far altro che aggiungere $20 al 
byte basso della figura presente. 

Per determinare se abbiamo per¬ 
corso tutte e sette le figure della se¬ 
rie basta controllare se è stato rag¬ 
giunto il byte basso $E0 della figu¬ 
ra. Ecco come si passa di figura in fi¬ 
gura. Prima facciamo POKE 
251,SHNUM (byte alto). Poi inse¬ 
riamo il byte basso appropriato diret¬ 
tamente nel secondo byte, $9300, 
della routine DRAW. Ogni volta 
che completiamo una serie di sette fi¬ 
gure la routine DRAWE viene ripri¬ 
stinata a LDA #$00, di modo che 
funzionerà a dovere per altre necessi¬ 
tà di disegno di programma. 

La cosa seguente, e probabilmen¬ 
te più importante, da tener presente 
è lo stato dei byte di spostamento 
quando entriamo nella routine o la la¬ 
sciamo. C'è sempre un byte di spo¬ 
stamento vuoto davanti alla figura 
quando richiamiamo la routine. Se 
entriamo nella routine per avanzare 
con le figure prespostate non abbia¬ 
mo da far altro che percorrere a una a 
una le sette figure e incrementare 
FR, FL, MR, ML, BR e BL quando 
ce ne andiamo. 

Se invece entriamo nella routine 
per muoverci in su o in giù dobbia¬ 
mo decrementare FR, MR e BR pri- 
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Listato 5. Block Routines 
completa 


90AA.9606 


90AA- 

A5 

FD 

C 9 

BD 

B0 

2F 



90B0- 

85 

06 

20 

91 

93 

A4 

FE 

B1 

90B8- 

26 

05 

F9 

20 

04 

F5 

A5 

F9 

90C0- 

91 

26 

20 

D5 

F 4 

88 

18 

CO 

90C8- 

FF 

F0 

04 

C4 

FF 

B0 

E8 

C6 

90D0- 

06 

A5 

06 

C9 

FF 

F0 

04 

C5 

90D8- 

FC 

B0 

D7 

E6 

FC 

E6 

FD 

60 

90E0- 

A5 

FC 

C9 

01 

90 

33 

E6 

FD 

90E8- 

85 

06 

20 

91 

93 

A4 

FE 

B1 

90F0- 

26 

85 

F9 

20 

D5 

F 4 

A5 

F9 

90F8- 

91 

26 

20 

04 

F5 

88 

18 

CO 

9100- 

FF 

F0 

04 

C4 

FF 

B0 

E8 

E6 

9108- 

06 

A5 

06 

C9 

BE 

F0 

04 

C5 

9110- 

FD 

90 

D7 

C6 

FD 

C6 

FD 

C6 

9118- 

FC 

60 

A9 

0E 

A6 

FB 

9D 

6F 

9120- 

8F 

60 

A9 

00 

8D 

54 

CO 

A9 

9128- 

40 

85 

E6 

60 

A9 

00 

8D 

55 

9130- 

CO 

A9 

20 

85 

E6 

60 

20 

22 

9138- 

91 

18 

90 

03 

20 

2C 

91 

20 

9140- 

0E 

92 

20 

0E 

92 

20 

7A 

91 

9148- 

20 

0E 

92 

20 

0E 

92 

20 

7A 

9150- 

91 

A5 

E6 

C9 

40 

F0 

E5 

60 

9158- 

20 

22 

91 

18 

90 

03 

20 

2C 

9160- 

91 

20 

B5 

91 

20 

B5 

91 

20 

9168- 

8A 

91 

20 

B5 

91 

20 

B5 

91 

9170- 

20 

8A 

91 

A5 

E6 

C9 

40 

F0 

9178- 

E5 

60 

A6 

FB 

DE 

6F 

8F 

DO 

9180- 

08 

20 

AC 

91 

A9 

0E 

9D 

6F 

9188- 

8F 

60 

A6 

FB 

DE 

6F 

8F 

DO 

9190- 

F8 

20 

97 

91 

18 

90 

ED 

A5 

9198- 

FF 

C9 

02 

90 

0E 

C6 

FF 

C6 

91A0- 

FE 

A5 

FF 

C9 

01 

90 

04 

C 6 

91A8- 

FF 

C6 

FE 

60 

E6 

FF 

E6 

FE 

91B0- 

E6 

FF 

E6 

FE 

60 

A5 

FD 

85 

91B8- 

06 

20 

91 

93 

18 

A4 

FE 

A9 

91C0- 

00 

85 

08 

85 

09 

85 

07 

90 

91C8- 

02 

E6 

08 

B1 

26 

C9 

80 

90 

91D0- 

02 

E6 

09 

A5 

08 

F0 

07 

B1 

91D8- 

26 

09 

80 

4C 

E2 

91 

B1 

26 

91E0- 

29 

7F 

6A 

91 

26 

90 

02 

E6 

91E8- 

07 

A5 

09 

C9 

01 

90 

06 

B1 

91F0- 

26 

09 

80 

91 

26 

C4 

FF 

F0 

91F8- 

08 

88 

A5 

07 

C9 

01 

4C 

BF 

9200- 

91 

C6 

06 

A5 

06 

C9 

FF 

F0 

9208- 

04 

C5 

FC 

B0 

AC 

60 

A5 

FD 

9210- 

85 

06 

20 

91 

93 

18 

A4 

FF 

9218- 

A9 

00 

85 

08 

85 

09 

B1 

26 

9220- 

2 A 

91 

26 

B0 

02 

90 

02 

E6 

9228- 

08 

C9 

80 

B0 

02 

90 

02 

E6 

9230- 

09 

A5 

08 

DO 

09 

B1 

26 

29 

9238- 

7F 

91 

26 

4C 

44 

92 

B1 

26 

9240- 

09 

80 

91 

26 

C4 

FE 

F0 

09 

9248- 

C8 

18 

A5 

09 

C9 

01 

4C 

18 

9250- 

92 

C6 

06 

A5 

06 

C9 

FF 

F0 

9258- 

04 

C5 

FC 

B0 

B5 

60 

38 

A5 

9260- 

FC 

E5 

E3 

85 

FC 

38 

A5 

FD 

9268- 

E5 

E3 

85 

FD 

60 

18 

A5 

FC 

9270- 

65 

E3 

85 

FC 

18 

A5 

FD 

65 

9278- 

E3 

85 

FD 

60 

A9 

00 

8D 

54 

9280- 

CO 

A9 

40 

85 

E6 

A5 

FC 

C5 

9288- 

E3 

90 

0F 

20 

6D 

92 

20 

2F 

9290- 

93 

20 

5E 

92 

20 

5E 

92 

20 

9298- 

2F 

93 

60 

A9 

00 

8D 

55 

CO 

92A0- 

A9 

20 

85 

E6 

20 

6D 

92 

20 

92A8- 

2F 

93 

20 

5E 

92 

20 

5E 

92 

92B0- 

20 

2F 

93 

60 

A9 

00 

8D 

54 

92B8- 

CO 

A9 

40 

85 

E6 

20 

5E 

92 

92C0- 

20 

2F 

93 

20 

6D 

92 

20 

6D 

92C8- 

92 

20 

2F 

93 

60 

A9 

00 

8D 

92D0- 

55 

CO 

A9 

20 

85 

E6 

20 

5E 

92D8- 

92 

20 

2F 

93 

20 

6D 

92 

20 

92E0- 

6D 

92 

20 

2F 

93 

60 

A9 

00 

92E8- 

85 

FA 

A5 

FD 

85 

06 

20 

91 

92F0- 

93 

A4 

FF 

A2 

00 

Al 

FA 

C9 

92F8- 

7F 

F0 

15 

C9 

01 

90 

11 

86 

9300- 

F9 

4A 

26 

F9 

E8 

E0 

07 

90 

9308- 

F8 

4A 

A5 

F9 

90 

02 

09 

80 

9310- 

91 

26 

C8 

E6 

FA 

DO 

02 

E6 

9318- 

FB 

C4 

FE 

90 

D6 

F0 

D4 

C6 

9320- 

06 

A5 

06 

C9 

FF 

F0 

04 

C5 

9328- 

FC 

B0 

C3 

20 

61 

93 

60 

A9 

9330- 

00 

85 

FA 

A5 

FD 

85 

06 

20 

9338- 

91 

93 

A4 

FE 

A2 

00 

Al 

FA 

9340- 

51 

26 

91 

26 

88 

18 

E6 

FA 


9348- 

DO 

02 

E6 

FB 

CO 

FF 

FO 

04 

9350- 

C4 

FF 

BO 

EA 

C6 

06 

A5 

06 

9358- 

C9 

FF 

FO 

04 

C5 

FC 

BO 

D7 

9360- 

60 

A9 

00 

85 

FA 

A5 

FD 

85 

9368- 

06 

20 

91 

93 

A4 

FE 

A2 

00 

9370- 

B1 

26 

81 

FA 

88 

18 

E6 

FA 

9378- 

DO 

02 

E6 

FB 

CO 

FF 

FO 

04 

9380- 

C4 

FF 

BO 

EC 

C6 

06 

A5 

06 

9388- 

C9 

FF 

FO 

04 

C5 

FC 

BO 

D9 

9390- 

60 

A4 

06 

B1 

CE 

85 

26 

A5 

9398- 

E6 

C9 

40 

DO 

05 

B1 

DE 

85 

93A0- 

27 

60 

B1 

EE 

85 

27 

60 

A9 

93A8- 

80 

85 

CE 

A9 

94 

85 

CF 

A9 

93B0- 

40 

85 

EE 

A9 

95 

85 

EF 

A9 

93B8- 

CO 

85 

DE 

A9 

93 

85 

DF 

60 

93C0- 

40 

44 

48 

4C 

50 

54 

58 

5C 

93C8- 

40 

44 

48 

4C 

50 

54 

58 

5C 

93D0- 

41 

45 

49 

4D 

51 

55 

59 

5D 

93D8- 

41 

45 

49 

4D 

51 

55 

59 

5D 

93E0- 

42 

46 

4 A 

4E 

52 

56 

5A 

5E 

93E8- 

42 

46 

4 A 

4E 

52 

56 

5A 

5E 

93F0- 

43 

47 

4 B 

4 F 

53 

57 

5B 

5F 

93F8- 

43 

47 

4 B 

4F 

53 

57 

5B 

5F 

9400- 

40 

44 

48 

4C 

50 

54 

58 

5C 

9408- 

40 

44 

48 

4C 

50 

54 

58 

5C 

9410- 

41 

45 

49 

4D 

51 

55 

59 

5D 

9418- 

41 

45 

49 

4D 

51 

55 

59 

5D 

9420- 

42 

46 

4 A 

4E 

52 

56 

5A 

5E 

9428- 

42 

46 

4 A 

4E 

52 

56 

5A 

5E 

9430- 

43 

47 

4 B 

4F 

53 

57 

5B 

5F 

9438- 

43 

47 

4 B 

4F 

53 

57 

5B 

5F 

9440- 

40 

44 

48 

4C 

50 

54 

58 

5C 

9448- 

40 

44 

48 

4C 

50 

54 

58 

5C 

9450- 

41 

45 

49 

4D 

51 

55 

59 

5D 

9458- 

41 

45 

49 

4D 

51 

55 

59 

5D’ 

9460- 

42 

46 

4 A 

4E 

52 

56 

5A 

5E 

9468- 

42 

46 

4 A 

4E 

52 

56 

5A 

5E 

9470- 

43 

47 

4 B 

4F 

53 

57 

5B 

5F 

9478- 

43 

47 

4 B 

4F 

53 

57 

5B 

5F 

9480- 

00 

00 

00 

00 

00 

00 

00 

00 

9488- 

80 

80 

80 

80 

80 

80 

80 

80 

9490- 

00 

00 

00 

00 

00 

00 

00 

00 

9498- 

80 

80 

80 

80 

80 

80 

80 

80 

94A0- 

00 

00 

00 

00 

00 

00 

00 

00 

94A8- 

80 

80 

80 

80 

80 

80 

80 

80 

94B0- 

00 

00 

00 

00 

00 

00 

00 

00 

94B8- 

80 

80 

80 

80 

80 

80 

80 

80 

94C0- 

28 

28 

28 

28 

28 

28 

28 

28 

94C8- 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

94D0- 

28 

28 

28 

28 

28 

28 

28 

28 

94D8- 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

94E0- 

28 

28 

28 

28 

28 

28 

28 

28 

94E8- 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

94F0- 

28 

28 

28 

28 

28 

28 

28 

28 

94F8- 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

A8 

9500- 

50 

50 

50 

50 

50 

50 

50 

50 

9508- 

DO 

DO 

DO 

DO 

DO 

DO 

DO 

DO 

9510- 

50 

50 

50 

50 

50 

50 

50 

50 

9518- 

DO 

DO 

DO 

DO 

DO 

DO 

DO 

DO 

9520- 

50 

50 

50 

50 

50 

50 

50 

50 

9528- 

DO 

DO 

DO 

DO 

DO 

DO 

DO 

DO 

9530- 

50 

50 

50 

50 

50 

50 

50 

50 

9538- 

DO 

DO 

DO 

DO 

DO 

DO 

DO 

DO 

9540- 

20 

24 

28 

2C 

30 

34 

38 

3C 

9548- 

20 

24 

28 

2C 

30 

34 

38 

3C 

9550- 

21 

25 

29 

2D 

31 

35 

39 

3D 

9558- 

21 

25 

29 

2D 

31 

35 

39 

3D 

9560- 

22 

26 

2A 

2E 

32 

36 

3A 

3E 

9568- 

22 

26 

2A 

2E 

32 

36 

3A 

3E 

9570- 

23 

27 

2B 

2F 

33 

37 

3B 

3F 

9578- 

23 

27 

2 B 

2F 

33 

37 

3B 

3F 

9580- 

20 

24 

28 

2C 

30 

34 

38 

3C 

9588- 

20 

24 

28 

2C 

30 

34 

38 

3C 

9590- 

21 

25 

29 

2D 

31 

35 

39 

3D 

9598- 

21 

25 

29 

2D 

31 

35 

39 

3D 

95A0- 

22 

26 

2 A 

2E 

32 

36 

3A 

3E 

95A8- 

22 

26 

2 A 

2E 

32 

36 

3A 

3E 

95B0- 

23 

27 

2B 

2F 

33 

37 

3B 

3F 

95B8- 

23 

27 

2B 

2F 

33 

37 

3B 

3F 

95C0- 

20 

24 

28 

2C 

30 

34 

38 

3C 

95C8- 

20 

24 

28 

2C 

30 

34 

38 

3C 

95D0- 

21 

25 

29 

2D 

31 

35 

39 

3D 

95D8- 

21 

25 

29 

2D 

31 

35 

39 

3D 

95E0- 

22 

26 

2A 

2E 

32 

36 

3A 

3E 

95E8- 

22 

26 

2A 

2E 

32 

36 

3A 

3E 

95F0- 

23 

27 

2B 

2F 

33 

37 

3 B 

3F 

95F8- 

23 

27 

2B 

2F 

33 

37 

3 B 

20 

9600- 

3A 

3E 

22 

26 

2A 

2E 

32 



Checksum del listato 5 

APPLE CHECKER 3.0 

NOME FILE: BLOCK ROUTINES 

TIPO: B 

LUNGHEZZA: 05BD 
CHECKSUM : DF 


ma di qualsiasi operazione di dise¬ 
gno, per rimuovere i byte di sposta¬ 
mento (ricordate che le figure vertica¬ 
li sono larghe solo tre byte), e ripri¬ 
stinare i byte di spostamento quando 
lasciamo la routine. 

Il movimento verticale delle figure 
è gestito in modo quasi uguale a 
quello dell'animazione a spostamen¬ 
to verticale. Guardando le linee 124- 
131 vedrete che è qui che viene testa¬ 
to DPTR (Direction PoinTer, punta¬ 
tore di direzione) per vedere dove si 
sta andando. 

Se ci si sta muovendo verso destra 
non facciamo che andare alla figura 
seguente. Se invece ci si muove in 
su o in giù dobbiamo decrementare 
o incrementare TOPLMT prima di 
passare alla figura seguente della se¬ 
rie. Ogni volta che saliamo di una li¬ 
nea dobbiamo decrementare 
TOPLMT, e ogni volta che scendia¬ 
mo dobbiamo incrementarlo. In pra¬ 
tica la differenza fra salire e scendere 
è tutta qui. 

Un'ultima nota, a proposito del 
movimento diagonale delle figure 
prespostate; in questo test non abbia¬ 
mo spostato in diagonale nessuna 
delle figure, ma se avete afferrato 
quel che è stato fatto finora il movi¬ 
mento in diagonale dovrebbe essere 
un gioco da ragazzi: se dovessimo 
usare il nostro insieme di figure pre¬ 
spostate nelle routine di movimento 
verticale che cosa accadrebbe? Facen¬ 
do muovere la figura in su o in giù, 
e incrementando o decrementando il 
VT e il VB delle figure a ogni nuo¬ 
va figura della serie, la fareste anche 
avanzare, perciò muovendo una figu¬ 
ra prespostata in su o in giù si ha co¬ 
me risultato un movimento diago¬ 
nale. 

La sola ragione per cui non pote¬ 
te fare così nella nostra routine di 
prova è che T5.0BJ si attende che 
ogni figura a movimento verticale 
sia di un byte più stretta delle figure 
a movimento orizzontale. La rimo¬ 
zione delle linee 34-38 e 132-137 vi 
permetterebbe di sostituire le figure 
prespostate alle figure esistenti nelle 
routine di movimento verticale, otte¬ 
nendo così il movimento diagonale. 

Questo programma è disponibile 
su dischetto. L’elenco, i prezzi 
e le modalità d’ordine di questo 
e degli altri dischetti disponibili 
sono riportati nella rubrica 
Disk Service. 

N J 


® By Nibble e Applicando 
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Ecco un elenco dei computer shop presso i quali è possibile 
abbonarsi ad Applicando, acquistare una copia, cercare un numero arretrato... 


VALLE D'AOSTA 
Aosta: Informatique sas, Av. Conseil 
des Commis 14 - Quart (AO): Infor- 
matique 2, Reg. America 31. 
PIEMONTE 

Alba (CN): Centro computer, Via Pa- 
ruzza 2 - Alessandria: Sistemi Bit, 
Via Ghilini 27- Asti: Gestione Dati 
srl, Via B.Buozzi 45 - Biella (VC): 
Consul Computer srl, Via delle Rose 
2; Informatica Biella sas, Piazza S.Pao¬ 
lo 1/b - Borgomanero (NO): All 
Computer, Corso Garibaldi 106 - Cu¬ 
neo: Thema Inform.Distribuita sas, 
Via Statuto 10 -Domodossola (NO): 
Nuova Elettronica, Via Giovanni 
xxm 68 - Novara: D.R. srl, Viale 
XX Settembre 19; D.R. srl, Via More- 
ra 3; SPA srl, Via A. Canobbio 16/A - 
Pinerolo (TO): Elaborazione Dati 
Pinerolo, Viale Montebello 6 - Tori¬ 
no: A.B.Computer sas, Corso Grosse¬ 
to 209; Bellucci Benedetto, Via Papaci- 
no 23; Cominfor Sistemi sas, CorsoTe- 
lesio 4/B; Digitalsync snc, Corso Mo- 
ncalieri 303; Dimensione Personal, 
Via Bertola 22/e; GE.NE.CA srl, Via 
XX Settembre 51; Hobby Elettronica, 
Via Saluzzo 11/F-G-H; Omicron Com- 
uters snc, Corso Duca degli Abruzzi 
4; Pinto G.Componenti elettronici, 
Corso Principe Eugenio 15bis; Softec 
Computer srl, Via Juvara 24; Tecno- 
system computer shop, Corso Francia 
12; Tekno Computers srl, Via Mada¬ 
ma Cristina 31/c. 

LIGURIA 

Genova: Computer Center, Via S.Vin- 
cenzo 129r; Sals Informatica spa, Via 
D'Annunzio 2 e Viale B.Partigiane 
132r - Genova Sampierdarena: 
Computer Center sas, Via Storace 4r - 
Lavagna (GE): Raffo Linea Ufficio, 
Corso Genova 100 - La Spezia: So¬ 
ffine srl, Via Piave 19 - Rapallo 
(GE): Raffo Linea Ufficio snc, Via 
della Libertà 130 -Sanremo (IM): 
La Bottega del Computer, Via Martiri 
Libertà 180 - Savona: Briano snc, 
Corso Tardy e Benech 20r - Sestri Po¬ 
nente (GE): All Computer sas, Via 
C. Menotti 136r. 

LOMBARDIA 

Almè (BG): Elcod, Viale Italia 45/A 
Assago (MI): Basic Computers, Cen¬ 
tro Commerciale Milanofiori- Berga¬ 
mo: Il Mondo dell'Informatica, Via Pi- 
tentino 8; Studio 15 srl, Via Quarenghi 
60 - Brescia: Alfa Computer, Via 
Bassi 26; Brescia Computers srl, Via 
Malta 12; Il Computer srl, Via Solferi¬ 
no 5; Personal Data, Via Brozzoni 4 - 
Como: Accaesse Informatica srl, Via 
Acquanera 46; D.S.I. srl, Via Dottesio 
8; Irpe Informatica srl, Via Cadorna 
l/a - Cremona: Archimede, Via Pale¬ 
stra 11/b - Gallarate (VA): Irpe 
Computer srl, Va Pegoraro 8 - Gavar- 
do (BS): Bit Shop, Via G.Quarena 
120 - Lecco (CO): Computers Lecco 
snc, Via N.Bixio 18/b; Datamation, 
Viale Turati 40 - Lissone (MI): Com- 
puterlandia, Via Martiri Libertà 72 - 
Mantova: Antek Computer sas, Via 
Cavour 69 - Melegnano (MI): L’A¬ 
mico del Computer, Via Castellini 25 - 
Milano: A.G.Informatica srl, Via G. 
Silva 49; Alflnformatica Shop, Via 
Lazzaretto 2; All’Informatica srl, Via 
Vigevano 8; Communications Enginee¬ 
ring, Piazza Firenze 4; Deltron srl, 
Viale Gran Sasso 50; Esprit, Via Ber- 
amini 13; Happy System, Piazza Diaz 
; Il Tempio del Computer, Via Patta- 
ri 2; Indico srl, Via Marco d’Agrate 1; 
Indico srl,Via Pier Capponi 12; Infor¬ 
mation Technology, Via dei Bossi 7 
ang. Broletto; La Bottega Informatica 
srl, Via Turati 6; Macan sas, Via Bro¬ 
letto 39; Microtech Sistemi, Viale Pia¬ 
ve 7; Polisistemi.Via Dema 19; SH 


Computer srl, Viale Montenero 33; 
Small Business Computers, Via Vitru- 
vio 38; Softec Computer, Viale Jenner 
23 - Monza (MI): ESI srl, Via Cava- 
lotti 11; Nikom Electronics, Via Asia¬ 
go 7 - Pavia: M.A.S.H. Computer 
Systems, Via della Rocchetta 5; Senna 
Gianfranco snc, Via Calchi 5 - S. Anto¬ 
nio Mantovano (MN): Antek Com¬ 
puter sas, Via Manzoni 49 -Trezzano 
sul Naviglio (MI): Personal Compu¬ 
ter Shop, Via L. da Vinci 36 -Varese: 
IRPE srl, Via Carantani 1 - Villasan¬ 
ta (MI): Computer Area show room, 
Via Carducci z; Computer Area snc, 
Via Volta 27/a. 

IREN-IIN.Q 

Bolzano: Dataplan, Sparkasse Strasse 
9 - Merano: Computer Market, Via S. 
Maria del conforto 22 - Trento: 
SI.GE. sas, Via Piave 28. 
FRIULI-VENEZIA GIULIA 
Gorizia: Elcom, Corso Italia 149 - 
Pordenone: Electronic Center snc, 
Viale Libertà 79; Electronic Center, 
Viale Martelli 17 - Trieste: Compu- 
tenmarket, Via Valdirivo 6 -Turriaco 
(GO): Tecno Power Elettronica, Via 
Marconi 19 - Udine: Bit Computers, 
Via Pozzuolo 107; PS Elettronica sas, 
ViaTavagnacco 89/91 c.c. 

VENETO 

Bassano del Grappa (VI): A-Tre 
snc, Piazza Firenze 23 - Con egli ano 
(TV): Computing Program, Via 
G.Piovesana 32; De Marin Computers, 
Via Matteotti 142 - Creazzo (VI): 
Uomo Computer, Via Olmo 38 - Me¬ 
stre (VE): Pacinotti sas, Via Torino 
92 -Mirano (VE): Saving Elettroni¬ 
ca, Via Gramsci 40 - Montebelluna 
(TV): Uomo Computer, Corso Mazzi¬ 
ni 53 - Montecchio Magg.(VI): Ef- 
fecomp (Esa), Piazza Carli 2 - Pado¬ 
va: Capovilla & C. sas. Galleria Scro- 
vegni 5; Computer Service srl, Via 
Beethoven 3; EDP Sistemi srl, Via Bor¬ 
romeo 13 - Rovigo: Computer Servi¬ 
ce sas, Via Cavallotti 12 Treviso: A5 
Computers srl, Borgo Cavour 37/a - 
Venezia: Personal Computer, Canna¬ 
regio 5894- Verona: ARMU srl, Via 
Teatro Filarmonico 3; Chip Computer 
(Esa), Stradone S. Fermo 8; Esacomp 
srl, Via Roveggia 43; MOS 80 sas, Via 
Germania 21; MOS 80 Computer 
Shop, Via del Pontere 2; MOS 80 Per¬ 
sonal Computers, Largo Marzabotto 
21- Vicenza: Abc Informatica srl, 
Contrà Porta Padova 19; Abc Informa¬ 
tica srl, Viale S.Lazzaro 19; Sevi sas, 
Via S.Agostino 87 -Villafranca 
(VR): Studio 4, Corso V.Emanuele 
65. 

EMILIA .ROMAGNA 

Bologna: Ceda Minicomp sr, Piazza 
Aldrovandi 2/2; Computer Systems, 
Via Ercolani 10/d; Edp Sistemi BO, 
Viale Pietramellara 61/F; Lucky 
Systems, Via Farmi 33/a; Sercom, Via 
B. da Carpi 9/b - Carpi (MO): Iret 
Carpi, Via Berengario 58 - Cesena 
(FO): SHC snc, Via Pisa 40/42 -Ferra¬ 
ra: Mazzacurati Claudio, Viale Ca¬ 
vour 186/188; Soc. Termomeccanica, 
ViaTito Speri 5; Tecnomeccanica, Via 
Garibaldi 195 - Fidenza (PR): Archi- 
mede, Via Vito Aimi 2; RCM Compu¬ 
ter, Via Comini Malpeli 11 - Fio- 
renzuola d'Arda (PC): Centro 
Computer, Coreo Garibaldi 125/a - 
Forlì: A-Z Computer srl, Via Cignani 
7; Icof Impianti srl, Via Masetti 56; 
Kronos, Via O. Regnoli 30 - Imola 
(BO): Computers srl, Via S.P.Grisolo- 
go 38 -Modena: Canalgrande Infor¬ 
matica, Coreo Canalgrande 29; Masetti 
Elettronica srl, Via Emilia Centro 211 - 
Parma: Computek sas, Piazzale Boito 
5; Iret spa, Via Cavallotti 3; RCM 
Computer, Va Farmi 51/a - Piacen¬ 


za: PC Personal Computer, Via Chiap¬ 
poni 42; RCM Computer, Coreo V. E- 
manuele 96 - Reggio Emilia: Com¬ 
puter Center srl, Via D.Alighieri 4; E- 
saprogetti, Via F.Filzi 2; Iret spa, Via 
Emilia S.Stefano 32 - Rimini: Compu¬ 
ter Line, Via Coletti 61 - Sassuolo 
(MO): Iret Sassuolo, Via Pretorio 65 - 
Scandiano (RE): Informatica 

System, Via Statale 13/a - Viserba di 
Rimini (FO): Computer Center, Via 
Pallotta 25/a. 

TOSCANA 

Arezzo: Sisted srl, Via Galvani 22; Si- 
sted srl, Piazza Risorgimento 10 - Bor¬ 
go a Buggiano (rT): CODI snc, 
Via 24 Maggio 119 - Firenze: Anfrel 
Informatica sas, Via Masaccio 50 e Via¬ 
le Gramsci 10/r; Centro Servizi srl, 
Via Petrocchi 24; Computer Line srl, 
V iale Spartaco Lavagnini 20; Elettroni¬ 
ca Cento Stelle srl, Via Cento Stelle 
5/b; Line spa. Via G.Di Vittorio 10; 
Paoletti Ferrerò, Via il Prato 40/42r; 
P.T.E. snc, Via Duccio da Buoninse- 

f na 60; Soluzioni EDP srl, Corso dei 
intori 39r; Tuttocomputer (centro 
servizi), Via Panzani 36/38r - Forte 
dei Marmi (LU): Blu Data, Via Mo- 
rin 95 - Grosseto: C.I.S.I.D. Compu¬ 
ter snc, Via Papa Giovanni XXIII 4 - 
Livorno: Livinform 2, Scali delle 
Cantine 62; Livinform srl, Via Roma 
8 (piazza Attias) - Massa: Euro Com¬ 
puter sas, Piazza C. Bertagnini 4 - 
Montecatini (PT): Co-Di snc, Via 1 
Maggio 20/22, Fraz.Margine Coperta - 
Perignano (PI): Memor Informatica 
srl, Via Togliatti 2/4/8 - Piombino 
(LI): Centro Ufficio sdf, Via F.Fer- 
rer 37/39 - Pisa: Data Pori due, Via 
Sancasciani 35; Società Elettronica Tir¬ 
rena, Via Fucini 20 - Pistoia: Inter 
Systems, Via Mascagni 14 - Ponlede¬ 
rà (PI): Data Port srl, Via Brigate 
Partigiane 27 - S.Giovanni Valaar- 
no (AR): I.C.S. srl, Via Garibaldi 
46. 

UMBRIA 

Cerbara di Città (PG): Computer 
Post, Via Madonna del Vento - Foli¬ 
gno (PG): Linea Informatica snc, Via 
Garibaldi 81- Perugia: Icot Impianti, 
Via Cicioni 8 Ponte S.Giovanni 
(PG): Ready Computer srl, Via Adria¬ 
tica 49. 

LAZIO 

Latina: Easy Byte, Viale XVin Di¬ 
cembre 44 Lido di Ostia (Roma): 
A.C.S. Advanced Computer System, 
Via Consacchi 10; Cosmic srl, via del¬ 
le Gondole 168/170-Ostia (Roma): AG 
Computer Systems srl, Via A. Carabel¬ 
li 108/112 - Roma: AG Computer 
Systems srl, Via G.Lanza 101/105; 
Biotech srl, Via S.Valentino 18; Bit 
Computers 2, Viale Ionio 333/335; Bit 
Computers 3, Via Nemorense 14/16; 
Bit Computers Nord, Via Tuscolana 
350/350a; Bit Computers Star, Via 
F.Satolli 55/59; Compushop, Via No- 
mentana 265/273; Computer Center 
srl, Via Nizza 48/52; Computerai! srl, 
Via Michele di Landò 41 ; Computime 
srl, Via Cola di Rienzo 28; Computime 
srl, Viale Parioli 25; Cosmic srl, Via 
Viggiano 70; Cosmic srl, Via Vespasia¬ 
no 56/b; Easy Byte, Via G.Villani 24; 
EDP Market, Via Somalia 205; EM 
Eur Micro Computer, Viale C. Pavese 
267; FBM di Mario Bagnetti, Via Fla¬ 
minia 395; SIPREL srl, Via Pompeo 
Magno 94 - Roma EUR: Bit Compu- 
tere, Via F.Domiziano 10-Viterbo: Al¬ 
fa Computer, Via Palmanova 12/c. 

MARCHE 

Ascoli Piceno: Rinascita Informati¬ 
ca sas, Coreo Trento e Trieste 17-Ca- 
merino (MC): MED, Via V.Venanzi 
11/13 - Civitanova Marche (MC): 
NBP Elettronica, Via Don Bosco 


11/13-Fabriano (AN): MED, Piazza 
Rosselli 6-Jesi (AN): EMJ sas, Via 
F.Conti 4; New Computer srl, Via Per- 
golesi 271- Macerata: MED, Via 
Mozzi 72/a -Torrette di Ancona 
(AN): Sisteda spa, Via Flaminia 
286/a; Sisteda srl, Via Velino 5. 

ABRUZZO 

Avezzano (AQ): Aspron, Via Ameri¬ 
ca 10/12 - Chieti: Computer sdf, Via¬ 
le Unità d'Italia 5 - L'Aquila: SEAD 
srl, Via Giardini 16a - Lanciano 
(CH): Electronic Microsystems, Via 
della Pace 3- Pescara: OCSA srl, Via¬ 
le Marconi 361 (zona stadio); Ormi 
Computers srl, Via C. Goldoni 5 -Va¬ 
sto Marina (CH): OCSA srl, S.S. A- 
driatica. 

MOLISE 

Boiano (CB): Iannotti Giovanni, Lar¬ 
go Duomo 14 - Campo basso: Infor¬ 
matica Molisana, Via B. Buozzi 12. 

CAMPANIA 

Avellino: ICC Elettronica srl, Via de¬ 
gli Imbimbo 126 - Barano d'Ischia 
(NA): Matterà Antonio, Via Roma 61- 
Benevento: Masone Informatica, Via¬ 
le dei Rettori 57- Caserta: Sistel 
Computers, Coreo Trieste 124 - Napo¬ 
li: Computer Systems srl, Via Puccini 
19; Golden Computer srl, Via Miche¬ 
langelo 7; IC International Computer 
srl, Via Nuova S.Rocco 62/P.co Solea- 
do; IC International Computer, Via Po- 
sillipo 130; La Barbera Carlo sas, Via 
Toledo 320 - Salerno: Computer 
System, Via E.Bottiglieri 19; SEDA 
srl, ViaParmenide c/olannone. 

BASILICATA 

Matera: Lucana Sistemi srl, Via Don 
Minzoni 4. 

PUGLIE 

Bari: Auditorium 3, Piazza Massari 
15; Ciesse spa, Via Re David 176/d; 
L.e L. Computers srl, Largo 2 Giugno 
4-Brindisi: SIC srl, Via S .Giovanni B o- 
sco 109 - Foggia: ISI srl, Via Matteot¬ 
ti 83 - Lecce: Quasar Informatica srl, 
Via Giacomo Arditi 11 - Moffetta 
(BA): Auditorium 3, Piazza Garibaldi 
12/a - Putignano (BA): Amore & 
Computer, Via GJLaterza 28-Taran- 
to: Elettrojolly Centro srl, Via De Ce¬ 
sare 13. 


CALABRIA 

Catanzaro: Ce Sim sas, Via Carlo V 
174/180; Visicom srl, Via Minniti Ip¬ 
polito 10 - Cosenza: Micro System 
sdf, Via Roma 75 - Gioia Tauro 
(RC): Tecnocomp snc, Via Nazionale 
SS 111/117 - Reggio Calabria: 
GLM Informatica snc, Via De Nava 98 
- Spezzano Albanese (CS): Iannibel- 
li, Via Stragolia 48. 

SICILIA 

Catania: Capici Francesco, Via Ala 
57/59; Centro Informatica sdf, Via Fi¬ 
renze 211 ; Computer Shop, Via E. Or¬ 
lando 164; SI.EL Informatica snc, 
Piazza Galatea 2 - Messina: CEE srl, 
Via Industriale 116; Cubeta srl, Via 
Cardines 12/14; Libreria Bonanzinga, 
Via dei Mille 110 - Milazzo (ME): 
Tectron Tecnologie Elet. srl, Via dei 
mille - Palermo: Computer Shop (In- 
f.Comm.), Via Notarbartolo 23/bc; In¬ 
formatica Commerciale spa, Via No¬ 
tarbartolo 26 - Ragusa: Sosyco, Corso 
V.Veneto 597 -Trapani: Gualano Eu¬ 
genio, Via Virgilio 11. 

SARDEGNA 

Cagliari: SE, Via S.Lucifero 85 - Sas¬ 
sari: Bajardo, Viale Italia 16. 
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I CHING 



Potete usare il Mac per consultare l'antico Libro delle Mutazioni, 
che contiene la saggezza del futuro, e scegliere tre differenti metodi 
di consultazione, vedere gli esagrammi e le loro interpretazioni, 
e persino registrare su disco i vostri commenti. 

Ritorno al futuro 


Listato per Macintosh 


I Ching - di Michael Crichton 
© by Applicando & 

MicroSPARC, Ine. 

MS BASIC 2.0-2.1 binario 


Alcune righe del listato sono 
state spezzate per esigenze di 
impaginazione: 
quando incontrate il simbolo • 
continuate a battere SENZA 
PREMERE <return> 


TO 8 : FOR h= 
1 TC 64 :FOR 
TO 65 : READ 


1 TO 8 : READ T(v,h):NEXT h,v 
h = l TO 2-.READ r$(v,h):NEXT h,v 
an$(v):NEXT 


'INIZIALIZZAZI ONE 

RANDOMI2E TIMER 
DIM T(8, 8):FOR v=l 
DIM rS (64,2) :FOR v = 

DIM anS (65) :FCR v = l 
CLRS = STRING$(30," ") 

LINS = STRINGS(46,"_") 

GOSUB INITSCREEN 
GOSUB MENUON 

ON MENU GOSUB MENUEVENT : MENU ON 

IDLE : 

GOTO IDLE 

MENUEVENT: 

MENU OFF: GOSUB MENUOFF 
Menuld = MF.N’U(O) 

ITEMID = MENU (1) 

ON Menuld GOSUB ri LE, ICHING 
GOSUB MENUON 
MENU ON 
RETURN 


FILE: 

ON ITEMID GOSUB QUII 
RETURN 

ICHING: 

ON ITEMID GOSUB CASTING, RE AD FI LE, RF.ADF ILE, RF.FERENCES 
RETURN 

CASTING: 

GOSUB GETQUESTION 
'SCEGLI 

MOVETO 35,175: PRINT"Scegii il metodo di consultazione: 
Yl=205:Y2=Y1 +20 

BUTTON 1,1,"MONETE", (35,Yl) -(135,Y7): 

BUTTON 2,1, "AUTOMATICO", (165,Yl)-(32C,Y2) 

BUTTON 3,1, "MILLEFOGLIE", (350,Yl)-(450,Y2) 

GOSUB READBUTTON 

FOR X=1 TO 3:BUTTON CLOSE X:NEXT 
EDIT FIELD CLCSF. 1 

ON BUTTONPUSHED GOTO MONETE, AUTOM, MLLFGL 
MLLFGL : 

GOSUB SETSCREEN 
LINE (4 1 2,1 )- (489,70) , 3C,3E 
GOSUB SETBOX : P ? 

LOC AT E 17 , 1C : P R1 NT " S .E LEZI ON A 
, VELOCEMENTE" 

FCR 1=1 TO 6 

ST = 0 : LN = 4 9 : GOSUB YAROUTINES 
SI=ST:LN=LN-S1: GOSUB YAROUTINES 
S2 = ST:I.N=LN-S2: GOSUB YAROUTINES 
S3=ST:SUM=S1+S2+S3 
IF SUM=13 THEN L(I)=9 
IF SUM=25 THEN L(I)=6 
IF SUM=21 THEN L(I)=7 
IF SUM=17 THEN L(I)=8 
GOSUB DRAWLINE 






□□□□□□□□□□□□□□□ 
!=□□□□□□□□□□□□□□□ 
[=□□□□□□□□□□□□□□ 
cm □□□□□□□□□ □ □ □ cm 

n i—! c —:—— - ~ i r 



UNTO CENTRALE CON IL MOUSE 


(Continua) 


Prima, molto prima delle foglie di 
tò, per indovinare il futuro c'erano le 
mobilissime foglie della pizia. E pri¬ 
ma ancora, in un'altra parte del mon¬ 
do, c’erano gli steli di millefoglie, 
che le pazienti mani dei saggi cinesi 
sceglievano e interpretavano... 

Si chiama "I Ching", che significa 
Libro delle Mutazioni, ed è uno tra i 
più antichi strumenti di divinazione 
conosciuto. Il testo originale cinese 
risale a circa tremila anni fa, e la for¬ 
ma che noi ponosciamo oggi ne ha 
almeno 2500. 

L’I Ching non è solo un metodo 
per conoscere il futuro, è una filoso¬ 
fia, un modo di concepire l’universo 
tipicamente orientale. 

Il metodo divinatorio usato per 
consultare l’I Ching è particolarmen¬ 
te adatto per la trasposizione su per¬ 
sonal computer, e molte versioni in¬ 
fatti ne sono già state realizzate; que- 
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sta stesura per il Macintosh contiene 
però molte aggiunte e rifinimenti: a 
tutt’oggi è l’unico programma che 
include un elemento di valutazione 
temporale nella sua previsione e l’u¬ 
nico a simulare il complesso meto¬ 
do di consultazione con steli di mil¬ 
lefoglie. 

I metodi di 
consultazione 

• Steli di millefoglie. Nella 
sua più classica forma la consultazio¬ 
ne dell’I Ching richiede che una per¬ 
sona divida un mazzetto di 49 steli 
di una pianta chiamata millefoglie 
in due mazzetti approssimativamen¬ 
te uguali. Il numero di steli in ogni 
mazzetto viene contato e la differen¬ 
za va registrata o tenuta a mente. Al¬ 
cuni steli si eliminano, i restanti si 
dividono ancora per due. Dopo un se¬ 
condo conteggio si rimuovono altri 
steli e per la terza volta si dividono i 
resti. 

Questa tripla divisione produce tre 
numeri che sommati danno un valo¬ 
re compreso tra sei e nove. Questo è 
il valore di una delle sei linee della 
figura da comporre detta esagramma. 

Per generare un esagramma è ne¬ 
cessario dunque eseguire diciotto di¬ 
visioni e altrettanti conteggi: una di¬ 
vinazione completa richiede una buo¬ 
na oretta di lavoro. I cinesi pensaro¬ 
no a un metodo più sbrigativo che 
utilizzasse monete anziché steli di 
millefoglie. 

• Monete. Si usano tre monete. 
Alla testa è attribuito il valore 2, al¬ 
la croce il valore . Ogni lancio delle 
tre monete dà un valore compreso 
tra sei e nove: 


Testa (2) + Testa (2) + Testa (2) = 6 
Testa (2) + Testa (2) + Croce (3) = 

7 

Testa (2) + Croce (3) + Croce (3) = 

8 

Croce (3) + Croce (3) + Croce (3) = 
9 


NEXT 

GOTO WORK 


MONETE: 

GOSUB SETSCREEN 

MOVETO 160,275:PRINT "FAI CLICK PER SEI VOLTE..." 
XG=180:YG=190:P=5:WDTH=130 


Y1=230:Y2=Y1+20:B=4 
BUTTON 1,1, "6", (150,Yl) -(199,Y2): 
BUTTON 2,1, "7", (200,Yl)-(249,Y2) 
BUTTON 3,1, "8", (250,Yl)-(299,Y2> 
BUTTON 4,1, "9", (300,Yl)-(349,Y2) 
FOR 1=1 TO 6 

GOSUB READBUTTON 
L (I)=BUTTONPUSHED+ 5 
GOSUB DRAWLINE 

LINE (160,259)-(360,275) , 30,BF 

NEXT 

FOR X=1 TO 4:BUTTON CLOSE X:NEXT 
GOTO WORK 


AUTOM : 

GOSUB SETSCREEN 

MOVETO 160,275:PRINT " FAI CLICK SEI VOLTE..." 
XG=160:YG=225:P=7:WDTH=180 


HIDECURSOR 
FOR 1=1 TO 6 
CYCLER: 

CH= ( RND ( 1 ) *100) 

X=INT(RND (1)* CH) 

IF X/2=INT (X/2) THEN COINl=2 ELSE COINl=3 
X=INT(RND(1) *CH) 

IF X/2=INT (X/2) THEN COIN2=2 ELSE COIN2=3 
X=INT(RND (1)*CH) 

IF X/2=INT(X/2) THEN COIN3=2 ELSE COIN3=3 
IF (MOUSE (0)<>1) THEN GOTO CYCLER 
•LANCIA LA MONETA 

L ( I )=COINl+COIN2+COIN3: 

GOSUB DRAWLINE 

LINE (160,259)- (360,275),30, BF 
NEXT I 
SHOWCURSOR 


WORK: 

BEE P 

IF DIALOG(0)<> 0 GOTO WORK 
LI$=STR$ (L (1)) :L2S=STR$(L(2)) :L3$=STR$ (L (3)) 
L4$=STR$(L(4)):L5$=STR$(L(5)):L6$=STR$(L(6)) 
LT$=L1$+L2$+L3$: UT$=L4$+L5$+L6$ 

TI$=LT$:GOSUB FIRSTPASS:GOSUB LASTPASS:LT=TM 
TI$=UT$:GOSUB FIRSTPASS:GOSUB LASTPASS:UT=TM 
H1=T(LT,UT) 

T2$=LT$:GOSUB CHANGEPASS:GOSUB LASTPASS:LT=TM 
T2$=UT$:GOSUB CHANGEPASS:GOSUB LASTPASS: UT=TM 
H2=T(LT,UT) 

LN$=L2$+L3$+L4$:UN$=L3$+L4$+L5$ 

TI$=LN$:GOSUB FIRSTPASS:GOSUB LASTPASS:LN=TM 
TI$=UN$:GOSUB FIRSTPASS:GOSUB LASTPASS:UN=TM 
NI =T (LN, UN) 

'SCHERMO DI INTERPRETAZIONE 

CLS:TEXTFACE 0:GOSUB SETBOX:P=3 
FOR 1=1 TO 6 :GOSUB DRAWLINE:NEXT 
LOCATE 2,3:PRINT QS 
PRINT LINS 

LOCATE 4,3:PRINT "Situazione attuale 
$(HI,1) 

HEX=H1:GOSUB HEXANSWR 
PRINT LINS 
Y=CSRLIN 

LOCATE Y,3:PRINT "Sviluppi 
(2) ; r$ (H2,1 ) 

IF H2=H1 THEN H2=65 
HEX=H2:GOSUB HEXANSWR 
IF H2=65 THEN H2=H1 
GOSUB DELAYBUTTON 


- "; -.PRINT SPC (2) ; r • 


;:PRINT SPC • 


Lanciando sei volte le monete si 
ottengono sei numeri, uno per ogni 
linea dell’esagramma. 

• Generazione computerizza¬ 
ta. Il lancio delle monete può essere 
simulato usando la funzione random 
di qualsiasi calcolatore. Il program¬ 
ma genera continuamente tre valori 
con un apposito loop. Al click del 
mouse il loop viene abbandonato e 
il valore memorizzato, come se si 


SCHERMO DI RIEPILOGO 

CLS:TEXTFACE 0:GOSUB SETBOX:P=3 
FOR 1=1 TO 6 :GOSUB DRAWLINE:NEXT 
LOCATE 1,1:PRINT 
PRINT SPC (2);"Domanda : ";Q$ 

PRINT SPC (2);"Responso: ";LTS+UT$ 

PRINT LINS: PRINT 

PRINT SPC (2); "ESAGRAMMA PRINCIPALE - " ; 

PRINT USING "###"; H1;:PRINT SPC(2); r$(Hl,l) 

PRINT SPC (2); "ESAGRAMMA SECONDARIO - "; 

PRINT USING "###"; H2;:PRINT SPC(2);r$(H2,1) 

PRINT SPC (2); "ESAGRAMMA NUCLEARE - 

PRINT USING "###";NI;:PRINT SPC (2);r$ (NI,1) :PRINT 

PRINT SPC(2); "TEMPO (SE RILEVANTE) : **';r$(Hl,2) (Continua) 
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PRINT LIN$:IN$=" " 

PRINT SPC (2) ;:PRINT "TUA INTERPRETAZIONE: " 

EDIT FIELD 1, IN$ , (100, 195) - (400,210) 

BUTTON 1,1,"Continua", (350,275)-(440,290),1 
BLOOP : 

D=DIALOG(0):IF D<>6 AND D <> 1 THEN GOTO BLOOP 
IN$=EDIT$ (1) :IN$=UCASE$ (IN$) 

IF LE'N (N$ ) > 45 THEN IN$=LEFT$ (IN$, 45) 

•SCRIVE I DATI IN UN FILE TESTO 

D$=LEFT$(DATES,5):IF LEFTS(DS,1)="0" THEN D$=RIGHT$(D$,4) 
OPEN " ICHING.DATA" FOR APPEND AS #1 
PRINT #1,D$;" " ;Q$" / "INS 

PRINT #1," " ; HI;" ";H2;" [";LTS+UTS;")" 

CLOSE 

EDIT FIELD CLOSE 1 
BUTTON CLOSE 1 
CLS 

RETURN 


MENUON: 

MENU 1,0,1,"Archivio" 

MENU 1,1,1,"Esci" 

MENU 2,0,1,"I Ching" 

MENU 2,1,1,"Consultazione" 

MENU 2,2,1,"Leggi le risposte 
MENU 2,3,1,"Stampa le risposte 
MENU 2,4,1, "Ri feriment i..." 

MENU 3,0,0,"" 

MENU 4,0,0,"" 

MENU 5,0,0,"" 

RETURN 


precedenti" 
precedenti 


INITSCREEN: 

WINDOW 1, "", (1, 21)-(515,340),3 
CLS:TEXTFACE 1 

MOVETO 120,65: PRINT "I Ching";SPC(8);"di Michael Crichton" 
MOVETO 120,85: PRINT"Copyright 1986 by Applicando &" 

MOVETO 120,105: PRINT" MicroSPARC, Ine." 

line (33, 125 )- ( 450 , 125 } (Continua) 


fosse lanciata una moneta. Ripeten¬ 
do il procedimento sei volte si otten¬ 
gono i valori per le rispettive linee 
deiresagramma. 

Ogni linea deiresagramma può es¬ 
sere intera o spezzata. I valori 6 e 8 
producono linee intere, 7 e 9 produ¬ 
cono linee spezzate. Ogni nuova li¬ 
nea viene piazzata sopra la preceden¬ 
te, finche si ottiene una figura com¬ 
posta da sei linee. Le tre linee in bas¬ 
so formano il trigramma inferiore, 
le tre in alto il trigramma superiore. 
Consultando una tabella di trigram¬ 
mi si ottiene il numero che corri¬ 
sponde all’esagramma generato. Nel- 
l’I Ching i 64 esagrammi sono spie¬ 
gati e commentati uno per uno. Il te¬ 
sto, però, non fornisce solo istruzio¬ 
ni riguardanti l’esagramma, ma com¬ 
menta anche il significato di alcune 
particolari linee deiresagramma. 

Complichiamo le cose. Le linee 
con valore 6 e 9 sono dette linee mu- 
tevoli e vanno convertite nel loro 
opposto (la linea continua diventa 
spezzata e viceversa) producendo un 
secondo esagramma, anch’esso com¬ 
mentato dairi Ching. 





MICAHDRIVE AT™ 


Non si potrebbe chiedere di 
più a un disco rigido: velocità, 
robustezza e affidabilità. Ma 
MicahDrive AT™ è ben di più! 
Essendo interno non occupa 
spazio sul vostro tavolo e i suoi 
22 MB di capacità vanno ovun¬ 
que vada il vostro Macintosh. È 


dotato di una propria interfac¬ 
cia SCSI che lascia quella di 
Macintosh libera per altre peri¬ 
feriche. La totale compatibilità 
con MFS e.HFS assicura inoltre 
elasticità alla vostra scelta: sa¬ 
rete liberi di usare MicahDrive 
AT™ con il Macintosh 512 o con 


il Macintosh Plus indifferente¬ 
mente, 

MicahDrive AT™ viene conse¬ 
gnato completo di programma 
di backup, print spooling e si¬ 
stema di protezione dei dati. 

In vendita presso i migliori 
computer shop. 



via Bergamo 18 - 20135 Milano - tei. 02 5450036 5453376 

Hardware, software e soprattutto know-how. 
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MOVETO 147,145:PRINT"Scegli nel menu I Ching..." 

RETURN 

MENUOFF: 

MENU 1,0,0 
MENU 2,0,0 
RETURN 

QUIT: 

MENU RESET 
WINDOW CLOSE 1 
END 

GETQUESTION: 

CLS: TEXTFACE 1 

MOVETO 35,65: PRINT "Scrivi la tua domanda:" 

EDIT FIELD 1, Q$ , (1 00 , 95)- ( 400, 110) 

BUTTON 1,1,"Ok", (350,200) - (390,220) , 1 
ALOOP: 

D=DIALOG(0) : IF D<>6 AND D<> 1 THEN GOTO ALOOP 
Q$=EDIT$ (1) 

Q$=UCASE$(Q$):IF RIGHT$(QS,1) <> "?" THEN Q$=Q$+"?" 

IF LEN(QS) > 37 THEN Q$=LEFTS (QS, 37) 

QS=(60-LEN (Q$))/2 
LINE (33,145)-(450,145) 

BUTTON CLOSE 1 
RETURN 

READBUTTON: 

WHILE DIALOG(0)<>1:WEND 
BUTTONPUSHED=DIALOG(1) 

RETURN 

SETSCREEN: 

CLS: LOCATE 2,QS:PRINT QS 
LINE (15,40)- (490, 40) 

RETURN 

S ET BOX * 

LINE (412,10) - (489,80) ,33,B 
XG=420: YG=67 :WDTH=60 

RETURN 
DELAYBUTTON : 

BUTTON 1,1, "Continua", (350, 27 5)-(440,2 90),l 
GOSUB READBUTTON 
BUTTON CLOSE 1 
RETURN 

HEXANSWR: 

PRINT LINS: 

PRINT SPC (3) ; 

FOR CHR=1 TO LEN(an$ (HEX)) 

IF MIDS (an$(HEX) ,CHR, 1) = "/" THEN PRINT: PRINT SPC(3);:GOTO 
ADDRETURN 

PRINT MIDS (an$(HEX) ,CHR,1); 

ADDRETURN: 

NEXT CHR 
PRINT 
RETURN 

YAROUTINES : 

'DRAW THE BARS 

ST=0 : XI =50 : X2=X1: BEGIN=X1 : Yl=130 : Y2 = Y1+7 0 : INC = 8 
FOR RPT=1 TO LN 

LINE (XI, Yl) -(X2,Y2), 33 
X1=X1+INC:X2=X1 

NEXT 
WAITING : 

IF (MOUSE(0)=1) THEN GOTO GOTCLICK ELSE GOTO WAITING 
GOTCLICK : 

POSITN=INT((MOUSE(l)-BEGIN)/INC)+1 
IF POSITN>LN THEN POSITN=LN 
IF POSITN <1 THEN POSITN-1 
RYAR=LN-POS ITN-1 
LYAR=POSITN 

RM=RYAR MOD 4:IF RM=0 THEN RM=4 
LM=LYAR MOD 4:IF LM=0 THEN LM=4 
ST=RM+LM+1 
•ERASE THE BARS 

Xl=434: X2=X1:INC=8: 

FOR RPT=1 TO 49 

LINE (XI,Yl ) -(X2,Y2), 30 
X1=X1-INC:X2=X1 

NEXT 

LOCATE 17,10:PRINT CLR$;CLR$ 

RETURN 

DRAWLINE: 

XF =XG+WDTH 

pensi ze p,p ( Continua ) 




MOVETO XG,YG 

IF L(I)=6 OR L (I)=8 THEN GOTO BROKENLINE 
SOLIDLINE: 

LINETO XF,YG 
GOTO NEXTSETUP 
BROKENLINE: 

LINETO (XF-(WDTH*. 6) ),YG 
MOVETO (XF-(WDTH*.4)),YG 
LINETO XF,YG 
NEXTSETUP: 

YG=YG-(.15*WDTH) 

RETURN 


é ftrr.hh»)<» I Ehinij 


Il primo esagramma rappresenta la 
situazione attuale, il secondo indica 
la direzione verso cui si evolverà la 
situazione presente. L’esagrammà 
nucleare (il primo) può rappresentare 
l’aspetto centrale, il clou della situa¬ 
zione. Per leggere VI Ching è neces- 


FIRSTPASS: 

S$="":X$="" 

FOR N=1 TO LEN(Tl$) 
X3=MID$(T1$,N,1) 

IF X$="6" THEN X$-"8" 
IF X$="9" THEN: X$ = "7" 
S$=S$+XS 

NEXT 
TI$=S$ 

RETURN 

CHANGEPASS: 

S$="":X$ = "" 

FOR N-l TO LEN(T2$) 

X$ =MID$ (T2$, N, 1) 

IF X$="6 M THEN X$="7" 
IF X$="9" THEN XS="8" 

s$=s$+x$: 

NEXT 
TI$=S$ 

RETURN 


— 

QUALE SARA 1 IL FUTURO PER IL MAC 


Situazione attuale - 

IL PRINCIPIO PASSIVO 

Grande successo 

Particolarmente attraverso la persistenza 

e l'accettazione 


Sviluppi 

IL PRINCIPIO PASSIVO 


(La mancanza di linee mutevoli 
intende che il messaggio originale 
è particolarmente forte) 



LASTPASS: 

TM=VAL(TI $) 

IF TM=777 THEN TM*l:GOTO SKIP 

IF TM=788 THEN TM=2:GOTO SKIP 

IF TM=878 THEN TM=3:GOTO SKIP 

(Continua) 


( Continua 1 


Una videata del programma. 


MACTELEX® 


I 



Il primo sistema di automazio¬ 
ne telex realizzato apposita¬ 
mente per Macintosh: finalmen¬ 
te uno strumento versatile ed 
efficiente per soddisfare tutte 
le esigenze di trasmissione di 
messaggi telex. Arriverete a 


ridurre anche del 90% il tempo 
che attualmente nella vostra 
azienda è dedicato a questa at¬ 
tività. Inoltre con le statistiche 
che MacTelex vi fornisce po¬ 
trete controllare il vostro traffi¬ 
co e con la rubrica dei corri¬ 



spondenti abituali evitare noio¬ 
se ricerche.’ Di notte poi spedi¬ 
re telex costa meno: mentre voi 
dormite MacTelex lavora e vi 
aiuta a risparmiare. 

In vendita presso i migliori 
computer shop. 


via Bergamo 18-20135 Milano - tei. 02 5450036 5453376 

Hardware, software e soprattutto know-how. 
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saria una considerevole interpretazio¬ 
ne personale, poiché i testi sono 
spesso metaforici e allusivi. Alcune 
traduzioni più recenti del testo sono 
più circostanziate e comprensibili, 
marichiedeono sempre un’interpreta¬ 
zione attiva. 

Come si usa 
e come funziona 

Nonostante la procedura di consul¬ 
tazione, l’I Ching è poco soddisfa¬ 
cente nelle risposte alle domande che 
implicano solo un sì o un no. Così 
pure domande circostanziate su date 
di eventi danno risposte poco apprez¬ 
zabili. 

In generale si ottengono i migliori 
risultati con domande complete del 
tipo: Mi conviene intraprendere ora 
questo progetto?, Perchè ho questi 
problemi con...?, Come posso otte¬ 
nere questo scopo?. Devo scrivere 
ora questo programma?, Sopravvalu¬ 
to questa situazione?... 

Dopo aver formulato la domanda 
liberate la vostra mente e concentra¬ 
tevi su di essa durante la consultazio¬ 
ne, qualsiasi metodo sccgliate. 

Appena avviate il programma vi 
sarà chiesto di scrivere la domanda, 
che rimarrà sullo schermo per tutta 
la fase di consultazione. Avete tre 
possibilità: lanciare per conto vostro 
delle monete e comunicare i risultati 
al calcolatore; simulare il lancio del¬ 
le monete; simulare la divisione de¬ 
gli steli di millefoglie. 

Qualsiasi metodo sccgliate il pro¬ 
gramma calcolerà i valori delle line 
e costruirà l’esagramma (figura 1), 
producendo poi una pagina riassunti¬ 
va dove sono elencati i numeri delle 
linee dell’esagramma, il nome e il 
numero della figura, e un’approssi¬ 
mativa datazione dell’evento. Questo 
è già sufficiente per consultare a pia¬ 
cere il testo del libro. 

La pagina riassuntiva attende un 
vostro commento che verrà registra¬ 
to assieme alla domanda e all’esa- 
gramma in un file chiamato ICHIN- 
G.DATA. 

Il file può essere letto con un text- 
editor, con MacWrite o con MS 
Word, o più semplicemente selezio¬ 
nando la voce Leggi le risposte pre¬ 
cedenti nel menu I Ching direttamen¬ 
te da programma (che comprende an¬ 
che l’opzione Stampa le risposte pre¬ 
cedenti). 

Per battere il programma, usate la 
versione binaria dell’MS Basic 2.0, 


IF TM=887 
IF TM=888 
IF TM=877 
IF TM=787 
IF TM=778 
SKIP : 
RETURN 


THEN TM=4: GOTO SKIP 
THEN TM=5: GOTO SKIP 
THEN TM= 6 : GOTO SKIP 
THEN TM=7: GOTO SKIP 
THEN TM=8 


READFILE : 

CLS : TEXTSIZE 9: TEXTFACE 0 
OPEN "ICHING. DATA" FOR INPUT AS #1 
IF ITEMID =3 THEN GOTO PRINTIT 
NEXTSCREEN: 

CLS 

IF FLG=1 THEN GOTO FINISH 
CY=0 

WHILE NOT EOF(1) 

CY=CY+1:IF CY=22 THEN CY = 0 :GOSUB PAUSE: CLS:GOTO NEXTSCR • 

EEN : 

LINE INPUT #1, L$ : PRINT L$ 

WEND 

GOSUB PAUSE 
GOTO FINISH: 

PRINTIT: 

WHILE NOT EOF(1) 

LINE INPUT #1, L$:PRINT L$:LPRINT L$ 

WEND 

FINISH: 

CLOSE 

TEXTSIZE 12 
CLS 

RETURN 


PAUSE: 

BUTTON 1,1,"Continua",(350,275)-(440,290),1 
WHILE DIALOG(0)<>1:WEND 
BUTTON CLOSE 1 
RETURN 


REFERENCES: 

CLS:PRINT 

PRINT SPC(2); "Letture suggerite disponibili in Italia:" 

PRINT:PRINT 

TEXTFACE 1: PRINT SPC(3);" I Ching, a cura di John Blofeld • 
(Mondadori, 1976) " 

TEXTFACE 0:PRINT SPC (10); "Un'eccelente traduzione moderna, • 
nella collana Oscar." 

PRINT 

TEXTFACE 1: PRINT SPC(3);"I King, il libro delle mutazioni • 
(Arcana , 1979)" 

TEXTFACE 0:PRINT SPC (10); "Un volume ricco di diverse inter • 
preta zioni" 

GOSUB DELAYBUTTON 
CLS 

RETURN 


'MATRICE DEI DATI 

DATA 1,34,5,26,11, 9, 14, 43 , 25, 51, 3, 27, 24, 42, 21, 17 

DATA 60, 40, 29, 4, 1, 59, 64, 47, 33, 62, 39, 52, 15, 53, 56, 31 

DATA 12, 16, 8, 23, 2, 20, 35, 45, 44, 32, 48, 18, 46, 57, 50, 28 

DATA 13, 55, 63, 22, 36, 37, 30, 49, 10, 54, 60, 41, 19, 61, 38 • 

, 58 

•NOMI DEGLI ESAGRAMMI 

DATA IL PRINCIPIO CREATIVO, MAGGIO, IL PRINCIPIO PASSIVO, NOVEM • 
BRE, DIFFICOLTA', DICEMBRE 

DATA IMMATURITÀ' GIOVANILE, GENNAIO, INATTIVITÀ 1 CALCOLATA, FEB • 
BRAIO 

DATA CONFLITTO, MARZO, L'ESERCITO, APRILE, UNIONE, APRILE 
DATA CONFINARE , APRILE, CAMMINARE, GIUGNO 

DATA PACE, FEBBRAIO, STAGNAZIONE, AGOSTO, FRATELLANZA, LUGLIO 

DATA GRANDI POSSESSI, MAGGIO, MODESTIA, DICEMBRE 

DATA ENTUSIASMO, MARZO, SEGUIRE (ADATTARSI), FEBBRAIO 

DATA DECADENZA , MARZO, AVVICINAMENTO, GENNAIO 

DATA CONTEMPLAZIONE , MAGGIO-LUGLIO, MORDERE, OTTOBRE 

DATA ELEGANZA, AGOSTO, SCORTICARE, OTTOBRE 

DATA RITORNO, DICEMBRE, INTEGRITÀ', SETTEMBRE 

DATA POTENZIALE, AGOSTO, NUTRIMENTO, NOVEMBRE, ECCESSO , OTTOBRE 
DATA ABISSO, NOV-GEN, BELLEZZA FIAMMEGGIANTE (SINERGIA), SETTEM • 
BRE 

DATA ATTRAZIONE, MAGGIO, PERSISTENZA , LUGLIO, RITIRARSI, LUGLIO 
DATA IL POTERE DEL GRANDE, MARZO, PROGRESSO, FEBBRAIO, CENSURA, • 
SETTEMBRE 

DATA FAMIGLIA, MAGGIO, GLI OPPOSTI, DICEMBRE 

DATA DIFFICOLTA', NOVEMBRE, LIBERAZIONE, FEBBRAIO 

DATA PERDITA, LUGLIO, GUADAGNO, GENNAIO, DETERMINAZIONE ,APRILE 

DATA CONTATTO (INCONTRI), GIUGNO, RIUNIRSI, MARZO 

DATA ASCESA , DICEMBRE, AVVERSITÀ', SETTEMBRE 

DATA IL POZZO, MAGGIO, RIVOLUZIONE, AGOSTO 

DATA ARMONIA COSMICA , GIUGNO, IL TUONO, FEB-APR (Continua) 
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DATA DESISTERE (STARE FERMI), OTTOBRE, PROGRESSO GRADUALE, GENN • 
AIO 

DATA SUBORDINAZIONE, SETTEMBRE 

DATA ABBONDANZA, GIUGNO,IL VIANDANTE, APRILE 

DATA VOLENTEROSA SOTTOMISSIONE, AGOSTO, GIOÌA,AGO-OTT 

DATA SPARGIMENTO (DISPERSIONE), GIUGNO, FRENARSI, LUGLIO 

DATA FIDUCIA INTERIORE (SINCERITÀ'), NOVEMBRE 

DATA CONSCIENZIOSITA', GENNAIO 

DATA DOPO IL COMPIMENTO, OTTOBRE, PRIMA DEL COMPIMENTO, NOVEMBRE 


'COMMENTI AGLI ESAGRAMMI 

DATA Attività creativa/Grande successo! 

DATA Grande successo/Part icolarmente attraverso la persistenza/ • 
e l'accettazione 

DATA Eventuale successo dopo le difficoltà/Non intraprendere nu • 
ovi progetti/Segui consigli 

DATA Successo/Sebbene tu possa aver bisogno di aiuto /nel trova • 
re la strada 

DATA Grande successo /La costanza ripaga. 

DATA Buoni auspici /se si è cauti/Cattivi/se lasci avvenire con • 
flitti 

DATA Buona fortuna se/accetti l'aiuto di chi ti circonda 

DATA Sei in armonia con il tuo ambiente/Agisci ora 

DATA Esercita soltanto una gentile influenza/Nessuna nuova impr • 
esa o avventura/in questo momento 

DATA Un momento brillante e forse pericoloso/Guida te stesso co • 
rrettamente/e con dignità 

DATA Prosperità/Buona Fortuna/Successo 

DATA Un momento difficoltoso/in cui non puoi fare nulla/Ma non • 
dubitare di te stesso/nè arrenditi 

DATA Un momento propizio/specialmente per il raggiungimento/di 
più alti e impersonali traguardi 

DATA Successo- /Controlla il tuo io/Rifuggi 1'orgolio/Colt iva • 

i valori reali 

DATA E' indicato il successo attraverso la moderazione./Mantien • 
i un modesto equilibrio 

DATA Nuove idee possono funzionare/Analizza la natura essenzial • 
e di questo momento 

DATA Fai del tuo meglio/Riconoscendo/che altri controllano la s • 

(Continua) 


o meglio 2.1, e digitate il listato 
1. Salvate il programma su disco 
con il nome di I Ching. 

Vediamo ora come funziona. La 
procedura di inizializzazione crea le 
finestre, modifica la barra dei menu 
e dimensiona tre vettori: T, la matri¬ 
ce 8 x 8 della tabella degli esagram- 
mi; R$, i nomi degli esagrammi e 
dei mesi a loro associati; AN$, le in¬ 
terpretazioni degli esagrammi. Note¬ 
rete che ci sono 64 esagrammi ma le 
risposte sono 65. Il motivo è che la 
65esima risposta è un commento ag¬ 
giuntivo, che compare nel caso l’esa- 
gramma primario e quello seconda¬ 
rio siano uguali. 

La routine Domanda legge la do¬ 
manda e verifica la sua lunghezza. 

Scegli vi permette di selezionare 
il metodo di consultazione agendo 
su uno dei tre bottoni sullo scher¬ 
mo. Secondo la vostra risposta il 
controllo del programma passa alla 
subroutine Monete, Autom, o Mille¬ 
foglie (mllfgl). 

Quest’ultima è la routine più com¬ 
plicata da seguire. Se avete compre¬ 
so la procedura di divisione degli ste¬ 
li vi sarà più semplice decifrarla. 



PC MACBRIDGE™ 


Da oggi utilizzare la LaserWri¬ 
ter Apple non è più un privile¬ 
gio riservato a chi possiede 
Macintosh. PC MacBridge dota 
qualunque PC IBM o compati¬ 
bile della possibilità di colle¬ 
garsi a AppleTalk, la rete locale 
realizzata dalla Apple. Fino a 31 


macchine, in una qualunque 
combinazione di PC IBM e Ma¬ 
cintosh, possono condividere 
l’altissima qualità della stam¬ 
pante LaserWriter. E anche il 
suo prezzo. Ma non è tutto: se 
siete collegati a AppleTalk, 
perchè non approfittarne per 


scambiarvi posta elettronica e 
dati con la massima semplicità? 
Da PC a PC o da PC a Macin¬ 
tosh* e viceversa. PC Mac¬ 
Bridge è anche questo. 

In vendita presso i migliori 
computer shop. 

* È necessario MailCenter della Videx 



via Bergamo 18-20135 Milano - tei. 02 5450036 5453376 

Hardware, software e soprattutto know-how. 
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ituazione 

DATA Presta attenzione ai dettagli/Procedi con cautela/Lavora d • 
uramente/Il successo può arrivare 
DATA E' il momento di una promozione immediata/Ma ci saranno pr • 
oblemi/in seguito 

DATA La meditazione ti dirà cosa ha condotto a questa situazion • 
e/e ciò che ne conseguirà/Difficilmente si vede ciò che uno desi • 
dera 

DATA Affronta il problema direttamente/Non puoi ignorarlo/né ev • 
itarlo/non più 

DATA Non prendere ora grandi decisioni/E'un buon momento per pi • 
ccoli miglioramenti/e autoaffermazioni 
DATA Ogni cosa sta peggiorando rapidamente/su ogni fronte!/Puoi • 
però affrontare la situazione risolutamente 

DATA Non insistere/le cose mutano autonomamente/Studia questa f • 
ase/fa parte di un ciclo 

DATA Esamina le tue motivazioni/11 successo viene da una giusta • 
motivazione 

DATA Hai il potenziale/puoi fare molto./La tempestività è nell' • 
essere. 

DATA II corretto nutrimento di te e degli altri/è la chiave del • 
la situazione ora 

DATA La situazione attuale è appesantita/da molte considerazion • 
i/cerca una via di fuga 

DATA La minaccia è reale/Se agisci con confidenza e virtù /otte • 
rrai successo 

DATA Tu e l'oggetto della tua domanda /dipendete l'uno dall'alt • 
ro/Riconoscilo e agisci di conseguenza 
DATA Attrazione... Stai in guardia.../Può non essere benefica.. • 
./Le cose si riconoscono da ciò che attraggono/e da ciò che sono • 
attratte 

DATA Insisti/Concentrati sui traguardi/se vuoi evitare la catti • 
va sorte 

DATA Successo attraverso la moderazione/Successo nelle piccole • 
cose. 

DATA Una grande potenza è la prova di un forte carattere/(Una p • 
revisione molto favorevole.) 

DATA Progresso/Successo/Comunicazioni /Tutti sono indicati. 

DATA Confrontata da serie minaccie/La tua situazione non è forte. 
DATA Le azioni dicono più delle parole/in questo momento./Ricor • 
da che ogni cosa ha un suo posto 
DATA Forze opposte neutralizzano le tue mosse./C'è un dualismo 
anche dentro di te? 

DATA Ostacoli/Sono inevitabili..../E spesso costruiti da te/Seg • 
ui l'avvertimento 

DATA Metti il passato dietro le tue spalle/Ora/Agisci! 

DATA Ogni successo contiene elementi/di perdita e sacrificio/Ac • 
cettali 

DATA Guadagnerai/Se ha un traguardo ben chiaro 

DATA Non è possibile un compromesso/Supera gli ostacoli/possono • 
essere sradicati 

DATA Le tentazioni sembrano meno pericolose/di ciò che sono in 
realtà /Procedi con cautela 

DATA Medita sul cento focale/di questa situazione/sii certo di 
perseguire obiettivi onorevoli 

DATA Guadagno di potere personale e di stima/è in previsione/Sf • 
rutta la situazione 

DATA Avversità/che possono essere superate con la forza/di volo • 
ntà/e mutare nel successo 

DATA Riconosci che alcune cose non possono essere cambiate/Lavo • 
ra per il bene comune 

DATA Evita l'astio e 1'eccesso/Agisci con confidenza 
DATA Accordo armonioso /con l'universo/in questo momento 
DATA Grandi cambiamenti/Crescita personale /Suggerita cautela.... 
DATA Concentrati sul tuo vero io/Calma la mente/Ottieni la pros • 
pettiva/Visualizza la situazione senza pregiudizi 
DATA Progressi lenti e ponderati/sono indicati in questa situaz • 
ione 

DATA Agisci come un subordinato: eviterai errori/e otterrai sue • 
cesso 

DATA Ora è il momento della massima abbondanza/Domani inizierà 
il declino inevitabile 

DATA Stai semplicemente viaggiando attraverso le situazioni/Non • 
dimenticarlo ! 

DATA La situazione può esere influenzata/solo da sforzi gentili • 
e graduali 

DATA La gioia aiuta nei momenti difficili/E d'altronde/1'indulg • 
enza può essere seducente 

DATA Renditi devoto a qualcosa che abbia vero significato 

DATA Accetta le limitazioni/sono parte della vita/e spesso sono • 

legate alla crescita 

DATA In questo momento/sii aperto e senza pregiudizi /mettiti n • 
ei panni di altri 

DATA Hai bisogno di umiltà/cerca di ottenerla. 

DATA II successo che verrà dalle piccole cose/è vicino./Non cer • 
care l'importanza ora. 

DATA Raggiungere i traguardi prefissati è molto prossimo/Un buo • 
n auspicio. 

DATA (La mancanza di linee mutevoli /intende che il messaggio o • 
riginale/è particolarmente forte) 


Monete è la routine più elementare: 
ci sono quattro bottoni con i valori 
da 6 a 9 da premere. Autom contiene 
un ciclo infinito in cui si simula il 
lancio della moneta, da cui si esce 
al clic del mouse. 

Vediamo il corpo del programma. 
Per prima cosa i valori interi L(I) so¬ 
no convertiti in stringhe per poter es¬ 
sere manipolati come trigrammi infe¬ 
riori e superiori. Si usano le strin¬ 
ghe perché i trigrammi devono esse¬ 
re rappresentati come, per esempio, 
"679" e non 6+7+9=22. 

Le stringhe dei trigrammi sono tra¬ 
sformate dalle suboutine FirstPass e 
LastPass per ottenere il numero del- 
Pesagramma. Queste trasformazioni 
sono necessarie perché la tabella dei 
trigrammi (nel libro I Ching) è ordi¬ 
nata per disegni piuttosto che per va¬ 
lori numerici. 

Un trigramma costituito da sole li¬ 
nee intere potrebbe avere valore 777, 
779, 797, 999, 997, 977 o 979... E 
ogni combinazione apparirebbe ugua¬ 
le sullo schermo. 

FirstPass converte le line 6 in 8 e 
9 in 7; nell’esempio precedente il tri¬ 
gramma dalle linee intere emerge da 
questa routine con un solo valore: 
777. LastPass usa questo valore per 
trovare un numero tra 1 e 8 che per- 
mettarà la consultazione della matri¬ 
ce 8 x 8. Si crea così, utilizzando i 
numeri dei trigrammi superiore e in¬ 
feriore, il numero dell’esagramma 
(variabile HI). 

ChangePass converte i trigrammi 
originali nella loro forma secondaria 
e invoca nuovamente LastPass per 
trovare il numero deH’esagramma se¬ 
condario (H2). 

Infine si definiscono i trigrammi 
nucleari superiore e inferiore (LN$ e 
UN$), e si richiamano FirstPass e 
LastPass per tovare l’esagramma nu¬ 
cleare (NI). Ottenuti i tre numeri 
(HI, H2, NI) si procede alla visua¬ 
lizzazione dei risultati. Il program¬ 
ma lo fa in due fasi, creando uno 
schermo di interpretazione e uno 
schermo riassuntivo. Al termine del¬ 
la consultazione si apre il file-testo 
e si scrivono i dati relativi all’inter¬ 
pretazione. 


Questo programma è disponibile 
su dischetto. L’elenco, i prezzi 
e le modalità d’ordine di questo 
e degli altri dischetti disponibili 
sono riportati nella rubrica 
Disk Service. 

Ni J 
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Per chi 
comincia 



Nuovi lettori, siate i benvenuti. Queste 
pagine sono per voi, e le ripeteremo a o- 
gni numero per facilitare il primo incon¬ 
tro. con Applicando e con il mondo di Ap¬ 
ple. Ovviamente queste righe non intendo¬ 
no sostituire i manuali, dei quali consiglia¬ 
mo caldamente la lettura, ma possono ba¬ 
stare per chi intende soltanto utilizzare i 
programmi che pubblichiamo, copiarli, 
salvarli su dischetto e farli partire. 

Cominciamo con qualche rapidissima 
premessa su Apple II. Quando accendete 
per la prima volta il vostro Apple con un 
dischetto già inserito nel drive e la tastie¬ 
ra posizionata sull'inglese (per chi possie¬ 
de Apple Ile e Ile), dovreste veder compari¬ 
re sullo schermo il segno chiamato 
cursore, o prompt, in inglese. Mentre se a- 
vete la tastiera posizionata sull'italiano, 
vedrete é. La sua presenza significa che 
potete fare una di queste tre cose: 

1) Fornire al computer comandi destina¬ 
ti al drive (per esempio CATALOG mostra 
il contenuto del dischetto, se si tratta di 
un dischetto in Basic). 

2) Fornire comandi nella versione per 
Apple del linguaggio Basic (e cioè l'Ap- 
plesoft Basic). 

3) Battere sulla tastiera righe di pro¬ 
grammi in Applesoft Basic. 

Per copiare un programma da Applican¬ 
do potrà essere necessario fare tutte e tre 
le cose. 

Per battere un programma 
di Applicando 

Per prima cosa sarà opportuno leggere 
fino in fondo l'articolo che accompagna il 
programma. Può darsi che non capiate pro¬ 
prio tutto la prima volta: non preoccupate- 
vene, in seguito diventerà facilissimo. 
Cercate soprattutto le eventuali istruzioni 
che spiegano se occorre fare qualcosa di 
particolare per battere il programma. In o- 
gni caso assicuratevi di aver pronto un di¬ 
schetto già inizializzato per poter salvare 
quel che avrete battuto. Per i dettagli su 
come inizializzare un dischetto vergine, 
guardate i manuali; chi proprio ai manuali 
fosse allergico, faccia così: a Apple spen¬ 
to inserisca il dischetto System Master 
nel drive 1, e accenda il computer; quando 
il drive avrà smesso di girare (lueina rossa 
di nuovo spenta), tolga il System Master 
dal drive e inserisca al suo posto un di¬ 
schetto sicuramente vergine e sicuramente 
mai usato (attenzione: si possono reinizia- 
lizzare anche dischetti già usati, ma il lo¬ 
ro contenuto va irrimediabilmente perso); 
ora basta battere NEW, Return, e poi INIT 
HELLO, sempre seguito da Return. 

Tutti i programmi in Basic consistono 
di una sequenza di righe di istruzioni. Tut¬ 


te le righe sono numerate all'inizio, e pos¬ 
sono contenere una o più istruzioni. Se le 
istruzioni sono più d'una, esse saranno se¬ 
parate da segni di due punti (:). Per e- 
sempio: 

20 FOR J = 1 TO 5: PRINT CHR$(7): 

NEXT J 

Per copiare da Applicando un program¬ 
ma, inserendolo nel vostro Apple, occorre 
assicurarsi che la memoria operativa del 
computer sia vuota battendo NEW Return 
(questa istruzione non cancella nulla di 
ciò che è registrato sui vostri dischetti: li¬ 
bera soltanto la memoria del computer dal¬ 
l'ultimo programma usato), ed è necessa¬ 
rio poi battere i listati così come sono 
stampati, riga per riga, compresi i nume¬ 
ri di riga, battendo Return solo quando si 
arriva al numero di riga successivo. Quan¬ 
do sarà stata copiata anche l'ultima riga e 
l'ultimo Return (a fine riga), si potrà sal¬ 
vare il programma su dischetto (il dischet¬ 
to che avete inizializzato, o un altro già i- 
nizializzato in precedenza su cui ci sia spa¬ 
zio libero a sufficienza). Per salvarlo ba¬ 
sterà battere il comando SAVE, seguito 
dal nome che intendete dare al programma 
che avete trascritto. Questo è tutto, ma ve¬ 
diamo passo per passo un esempio. 

10 REM CAMPANELLO 

20 FOR J = 1 TO 5: PRINT CHR$(7): 

NEXT J 
30 END 

Listato 1 

Per battere il semplice programma Cam¬ 
panello del listato 1 (produce solo un suo¬ 
no simile a quello di un campanello, nul- 
l'altro), si seguirà questa sequenza: 

1) Battete NEW Return per cancellare 
dalla memoria qualsiasi programma prece¬ 
dentemente usato. (Se state lavorando su 
un Apple Ile o un Ile assicuratevi che il ta¬ 
sto CAPS LOCK, il primo in basso a sini¬ 
stra, quello che permette di ottenere tutte 
le maiuscole, sia schiacciato.) 

2) Battete la linea 10 esattamente com'è 
stampata e premete il tasto Return solo 
alla fine dell'ultima parola (CAMPA¬ 
NELLO). 

3) Battete allo stesso modo anche le li¬ 
nee 20 e 30. 

4) Con un dischetto già inizializzato 
nel drive (nel drive 1, se ne avete due), 
battete SAVE CAMPANELLO Return, per 
registrare il vostro programma su di¬ 
schetto. 

5) Poiché il vostro programma è ancora 
nella memoria del computer, per farlo gira¬ 
re basterà battere RUN e premere il tasto 
Return. Se cancellate la memoria facendo 
girare un altro programma o spegnendo il 
computer, per usare nuovamente il pro¬ 


gramma occorrerà inserire il dischetto nel 
drive e battere RUN CAMPANELLO Re¬ 
turn. 


Alcuni suggerimenti 

I suggerimenti che seguono possono 
rendere il lavoro di trascrizione un po' più 
facile: 

1) Se commettete un errore di battitura 
in una riga e non avete ancora premuto il 
tasto Return, basterà tornare indietro con 
la freccetta sinistra, correggere l'errore, e 
tornare al punto in cui eravate con la frec¬ 
cetta destra, premendo Return come al so¬ 
lito solo a completamento dell'intera riga. 
Se invece vi accorgete deH'errore quando 
ormai avete premuto Return e siete passati 
a un'altra riga, completate tranquillamente 
la riga che state scrivendo, compreso il 
Return finale; poi ribattete la riga in cui a- 
vete commesso l'errore: ribattetela per in¬ 
tero, con numero di riga e tutto il resto, e 
la nuova versione prenderà automaticamen¬ 
te il posto della vecchia. 

2) Siate particolarmente attenti a non 
commettere errori di trascrizione nelle ri¬ 
ghe in cui compare l'istmzione DATA. Nel¬ 
le altre istruzioni un eventuale sbaglio è 
più facile da individuare, perché penserà e- 
ventualmente il computer a segnalarlo in 
seguito, nelle istruzioni DATA questo in¬ 
vece non avviene. 

3) Salvate periodicamente il programma 
mentre procedete, per minimizzare i guai 
di una eventuale interruzione di corrente. 
Se non avete tempo per trascrivere tutto il 
programma, trascrivete fin dove potete o 
volete (ma comunque completando fino al 
Retum la riga che state battendo), poi sal¬ 
vatelo su dischetto come se aveste finito. 
Per riprendere a trascrivere sarà sufficiente 
inserire il dischetto nel drive, accendere il 
computer, e battere LOAD seguito dal no¬ 
me che avete dato al programma, e da Re¬ 
tum (battete CATALOG se non ricordate 
più con che nome avete salvato il pro¬ 
gramma). La luce rossa sul drive si accen¬ 
derà, e il vostro programma verrà caricato 
nella memoria operativa del computer. A 
questo punto battete LIST, e vedrete scorre¬ 
re sullo schermo tutta la parte del pro¬ 
gramma che avevate già battuto. Continua¬ 
te adesso tranquillamente dal punto in cui 
avevate interrotto. 

4) Prima di effettuare modifiche o ag¬ 
giunte, trascrivete l'intero programma e fa¬ 
telo girare per prova. Questo renderà più 
facile la ricerca di eventuali errori, isolan¬ 
do quelli commessi durante la battitura e 
la trascrizione. Non preoccupatevi per il 
numero di errori di trascrizione che farete: 
è normale. Il computer vi segnalerà, riga 
per riga, dove avete sbagliato. Basterà a 
questo punto controllare la riga, indivi- 
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duare l’errore commesso e ribattere corret¬ 
tamente l'intera riga. A questo punto oc¬ 
corre salvare di nuovo il programma su di¬ 
schetto. 

5) Le lettere minuscole possono essere 
usate solo all'intemo di comandi che inclu¬ 
dono REM o tra virgolette. 

Programmi in 
linguaggio macchina 

Il Basic e il Dos sono ottimi linguaggi, 
ideati apposta per rendere più facile la pro¬ 
grammazione, ma l'Apple è in grado di ri¬ 
cevere comandi anche in un codice molto 
più vicino alla sua logica, chiamato lin¬ 
guaggio macchina. Il linguaggio macchi¬ 
na è un po' la lingua madre dell'Apple, un 
programma così composto sarà quindi 
compreso dal computer molto più veloce¬ 
mente di un programma scritto in Basic. 
Per creare programmi in questa lingua si u- 
sa spesso un programma chiamato Assem¬ 
bler. L'Assembler permette al programma¬ 
tore di scrivere in un codice più facile del 
linguaggio macchina: l’assembly. In un se¬ 
condo momento il programma stesso si 
tradurrà in linguaggio macchina. L'Apple 
infatti non conosce l'assembly. 

Molti dei programmi che troverete su 
Applicando saranno scritti in ambedue le 
versioni: assembly e linguaggio macchi¬ 
na; in questo modo potrete inserire le i- 
struzioni direttamente in linguaggio mac¬ 
china, senza dovervi procurare il program¬ 
ma Assembler. In questo caso le istruzioni 
dovranno essere inserite direttamente nel 
System Monitor (da non confondere col 
monitor video): per raggiungere il System 
Monitor è sufficiente battere CALL-151 e 
schiacciare il tasto Return. A questo punto 
sullo schermo comparirà un asterisco (*) 
che indica che è stato raggiunto il contat¬ 
to con il System Monitor. Per inserire i li¬ 
stati scritti in linguaggio macchina occor¬ 
rerà allora battere, per esempio, i seguenti 
comandi: 

300:A2 05 20 DD FB CA F0 03 4C 02 03 
60 Retum 

In questa serie di istruzioni il '300' indi¬ 
ca una locazione di memoria e i due punti 
dicono all'Apple di inserire i seguenti nu¬ 
meri (A2 e gli altri numeri in base 16) in 
quella locazione. I numeri sono in base 
16 (esadecimale); non è necessario saper 
calcolare con questa base per trascrivere i 
programmi in linguaggio macchina, ma è 
importante sapere che in questo tipo di 
linguaggio i numeri sono dati sempre in e- 
sadecimale. 

Facciamo un breve esempio di program¬ 
ma scritto in linguaggio macchina. Il se¬ 
guente listato serve a indirizzare alcuni da¬ 
ti in una particolare locazione di me¬ 
moria: 

300.30B 

0300-A2 05 20 DD FB CA F0 03 
0308-4C 02 03 60 

Listato 2 

I numeri a sinistra delle lineette (atten¬ 
zione: le lineette non vanno digitate, al 
loro posto occorre battere un "due punti") 
sono le locazioni di memoria, vale a dire 
gli indirizzi dello spazio di memoria in 


cui il dato dovrà essere conservato, e i nu¬ 
meri seguenti sono il contenuto, i dati da 
memorizzare nelle sette locazioni di me¬ 
moria indicate. I due numeri separati da un 
punto presenti nella prima riga indicano 
gli indirizzi iniziali e finali della parte di 
memoria considerata. Questo programma è 
la traduzione del listato numero tre, scrit¬ 
to in assembly. Come si noterà le colon¬ 
ne a sinistra sono molto simili al listato 
numero due, contengono infatti le locazio¬ 
ni di memoria, mentre la parte a destra 
contiene istruzioni in assembly. Esistono 
diversi programmi assembler e diverse di¬ 
sposizioni dei listati, ma in tutti sono pre¬ 
senti queste due diverse colonne. 

1 *RINGER PROGRAM 



2 ORG 

$300 


3 BELL EQU 

$FBDD 

0300: A2 05 

4 LDX 

*$5 

0302: 20 DD FB 5 LOOP JSR 

BELL 

0305: CA 

6 DEX 


0306: F0 03 

7 BEQ 

END 

0308: 4C 02 03 

8 JMP 

LOOP 

030B: 60 

9 END RTS 



Listato 3 


Per inserire i 

i listati nella 

macchina è 


sufficiente eseguire le seguenti opera¬ 
zioni: 

1) Digitare CALL-151 Retum per entra¬ 
re in contatto con il System Monitor, poi 
inserire la locazione di memoria, i due 
punti e il contenuto della memoria; nel ca¬ 
so del listato numero due ad esempio si di¬ 
giterà: 

300:A2 05 20 DD FB CA F0 03 Retum 
308:4C 02 03 60 Retum 

Un programma in Assembler sarà inve¬ 
ce così inserito: 

300:A2 05 Retum 
302:20 DD FB Retum 

305 :CA Retum 

306 :F0 03 Retum 
308:4C 02 03 Retum 
30B:60 Retum 

State attenti a non inserire lo spazio tra 
i due punti e il primo numero seguente, 
mentre invece bisogna mettere lo spazio 
fra le coppie di numeri. 

2) Una volta inserito l'intero listato, 
schiacciate CTRL-C Retum per tornare al 
livello Basic indicato dal segno '['. 

3) Al contrario dei programmi in Basic 
che iniziano nella stessa locazione di me¬ 
moria, e che possono essere salvati con 
un semplice SAVE, i programmi scritti in 
linguaggio macchina possono iniziare in 
diversi punti della memoria. Per salvare li¬ 
stati o dati in linguaggio macchina si do¬ 
vrà indicare quindi la locazione alla quale 
ha inizio il programma da salvare e la lun¬ 
ghezza dello stesso (in decimale o in esa¬ 
decimale). Per il programma usato prima 
come esempio, il comando sarà: 

BSAVE RINGER, A$300, L$C 

dove A$300 è la locazione di memoria di 
inizio programma e L$C è la lunghezza 
del programma (la lettera C corrisponde al 
numero decimale 12). All'inizio dei lista¬ 
ti in linguaggio macchina pubblicati su 
Applicando troverete sempre l'indicazione 


della locazione di memoria di inizio e fine 
programma; esempio: 300.3EA mentre nel 
corso dell'articolo troverete i parametri 
per salvare il programma, esempio: BSA¬ 
VE RINGER, A$300,L$C. 

4) Per rivedere il listato che avete tra¬ 
scritto basterà battere 300.30B, e sullo 
schermo si riprodurrà tutto ciò che avete 
battuto. Per ottenere una copia sulla stam¬ 
pante, basterà battere PR # (# se siete in 
tastiera italiana) seguito dal numero dello 
slot al quale avete collegato la stampante 
(normalmente il n. 1) Retum e poi ancora 
300.30B Retum. Le correzioni si fanno ri¬ 
battendo solo la riga contenente eventuali 
errori. 

5) Per far girare il programma basterà al¬ 
lora digitare BRUN RINGER, senza l'indi¬ 
rizzo. 

Quanto esposto sopra è valido sia per il 
DOS 3.3 (sistema operativo per la gestio¬ 
ne del drive che veniva fornito prima del¬ 
l’uscita del Ile) sia per il ProDOS (sistema 
operativo fornito con il Ile). Usando il 
ProDOS occorre però fare alcune precisa¬ 
zioni. I comandi del tipo SAVE, LOAD, 
RUN, CATALOG, ecc. vengono accettati 
anche in forma minuscola. 

Per formattare un disco non si potrà più 
usare il comando INIT HELLO, ma sarà ne¬ 
cessario usare il disco UTILITIES di Siste¬ 
ma fornito con il computer. Durante questa 
operazione vi verrà chiesto se il nome del 
disco, assegnato automaticamente dal com¬ 
puter, va bene oppure se volete cambiarlo. 
Infatti tutti i dischi formattati in ProDOS 
(indicati come Volume) hanno un nome e 
vengono riconosciuti indicando questo no¬ 
me dopo un comando diretto al drive. Per e- 
sempio se volete vedere il catalog di un di¬ 
sco chiamato BLANK, dovete battere 
CAT/BLANK. Per non ripetere continua- 
mente il nome del disco potete battere, pri¬ 
ma dei comendi diretti al drive, PREFIX/no- 
me disco seguito da Retum. Da questo mo¬ 
mento tutti i comandi al drive saranno di¬ 
retti automaticamente al disco scelto. 

Per vedere il catalog è sufficiente batte¬ 
re CAT. 

Durante l'uso di alcuni programi scritti 
in ProDOS potreste trovarvi una richiesta 
del tipo "PATHNAME?"; non spaventate¬ 
vi, il pathname è il nome del disco al qua¬ 
le vogliamo fare riferimento, scritto entro 
due barrette (/) e seguito dal nome del file 
che vogliamo salvare o caricare in memo¬ 
ria oppure trasferire da un disco a un altro. 


DOS e ProDos 

L'Apple Ile e il nuovo Ile vengono ven¬ 
duti con il sistema operativo ProDos che 
comprende un dischetto chiamato "Utili¬ 
ties di Sistema". Con le opzioni in esso 
contenute è possibile: 

• trasferire un file da un dischetto a un 
altro in tutti e tre i sistemi compatibili 
con l'Apple: DOS, ProDos, Pascal; 

• convertire i file da DOS a ProDos e vi¬ 
ceversa; 

• modificare la configurazione standard 
delle uscite seriali per stampante e mo¬ 
dem e anche scambiarle tra di loro; 

• formattare i dischetti nel sistema 
DOS, ProDos, Pascal. 

Queste sono solo alcune delle moltepli¬ 
ci possibilità offerte dal dischetto "Utili¬ 
ties di Sistema"; c'è però un piccolo pro- 
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blema: mentre per il sistema ProDos e Pa¬ 
scal dopo aver formattato il dischetto oc¬ 
corre memorizzare su di esso i file necessa¬ 
ri affinché alla riaccensione della macchi¬ 
na sia possibile ricaricare in memoria il 
sistema operativo scelto (ad esempio Pro¬ 
Dos e Basic.System per il ProDos), nel ca¬ 
so del DOS normalmente il sistema opera¬ 
tivo viene memorizzato sul dischetto al¬ 
l'atto della sua formattazione, perché non 
è possibile caricarlo in un secondo 
tempo. 

Purtroppo il dischetto "Utilities di Siste¬ 
ma" formatta il dischetto in DOS senza in¬ 
serire il sistema operativo trattandolo co¬ 
me un Disco Dati e non come un disco di 
avvio (boostrap). L’utente quindi, se non 
possiede già un altro dischetto in DOS 
contenente il sistema operativo (come i di¬ 
schetti di Applicando), non può utilizzare 
questo disco per memorizzarvi i program¬ 
mi copiati da Applicando o i propri pro¬ 
grammi scritti in DOS. 

Applicando ha pensato di ovviare a que¬ 
sto inconveniente fornendo a basso prez¬ 
zo (vedi Disk Service) un dischetto in 
DOS contenente sia il sistema operativo 
sia alcune utility per gestire i file in 
DOS. 

Per inizializzare un nuovo dischetto con 
il D.O.S 3.3, inserite nel drive il disco 
DOS.UTILITIES e accendete il computer. 
Dal Menù principale scegliete l’opzione 
FINE e battete RETURN. Sostituite il di¬ 
schetto nel drive con uno nuovo da inizia¬ 
lizzare e battete INIT HELLO seguito da RE¬ 
TURN. Il drive verrà attivato e, dopo circa 
un minuto, il nuovo dischetto sarà pronto 
per essere utilizzato e conterrà il sistema 
operativo D.O.S 3.3. 

Un'idea per aiutare coloro che desidera¬ 
no copiare i listati pubblicati su Appli¬ 
cando , ma, arrivati al termine, vengono 
scoraggiati dal mancato funzionamento 
dei programmi stessi per immancabili erro¬ 
ri di copiatura: risparmiare loro il metico¬ 
loso lavoro di controllo, con il program¬ 
ma, pubblicato a pag. 36 di Applicando 
25, APPLE CHECKER 3.0; permette di 
controllare il listato ricopiato confrontan¬ 
do il risultato ottenuto con i valori da noi 
indicati al termine di ogni listato. 

La procedura è molto semplice: 

• al termine di ogni listato troverete al¬ 
cune righe indicanti il nome del listato, 
il tipo di linguaggio nel quale è stato 
scritto (A=applesoft, B=binario), la sua 
lunghezza in esadecimale, e infine un dato 
importante che permette di sapere se avete 
copiato il listato senza errori: la CHE- 
CKSUM. 

• caricate in memoria APPLECHECKER 
con l'istruzione BRUN, caricate in memo¬ 
ria con l’istruzione LOAD o BLOAD il pro¬ 
gramma da controllare, battete CALL 25 e 
in pochi secondi avrete la sentenza. Se il 
programma da controllare è un listato bi¬ 
nario, occorre caricarlo in memoria tra¬ 
mite l'istruzione BLOAD nome program¬ 
ma, A$B00, per avere la certezza di non in¬ 
terferire con APPLECHECKER. 

Questa utility funziona solo in D.O.S. 
3.3. 

Per i programmi funzionanti in ProDos 
esistono due strade: copiare il programma 
in DOS, fare il controllo e quindi conver¬ 
tirlo in ProDos; oppure copiarlo in Pro¬ 
Dos e, nel caso di non funzionamento, 
convertirlo in DOS per effettuare il con¬ 
trollo con APPLECHECKER 3.0. 


Per chi comincia 
su Macintosh 


Per poter utilizzare i programmi per Mac¬ 
intosh pubblicati su Applicando dovete es¬ 
sere in possesso del dischetto fornito da 
Applicando attraverso il Disk Service, op¬ 
pure di una copia del Basic Microsoft (MS 
BASIC 2.0 o versioni più recenti). 

Se acquistate il dischetto, il programma 
girerà, perché sullo stesso dischetto è pre¬ 
sente il Runtime del Basic Microsoft, che 
consente di far funzionare il programma, 
senza però poterlo listare o modificare. Se 
invece disponete del Basic Microsoft, per 
iniziare inserite il vostro disco e accende¬ 
te il Mac. 

Vi accorgerete che esistono due versio¬ 
ni separate di MS BASIC, una decimale e 
una binaria. L'icona per la versione deci¬ 
male ha il segno del dollaro ($), questa 
versione è adatta soprattutto per program¬ 
mi di gestione monetaria. 

L'icona per la versione binaria ha il 
simbolo del pi greco e adatta soprattutto 
per calcoli matematici molto precisi. 

Nei programmi pubblicati su Applican¬ 
do è indicato il tipo di Basic utilizzato; 
tuttavia per molte applicazioni possono 
essere usate tutte due le versioni. 

Una volta che avete deciso la versione 
da utilizzare, fate un doppio clic sull'icona 
scelta. Una volta caricato, l'MS BASIC 
presenta una finestra per il Listato (List), 
una finestra dei Comandi e una finestra di 
Output con la finestra del listato attiva. 

Potete copiare i listati di Applicando at¬ 
tivando la finestra di List e seguendo la te¬ 
cnica della scrittura testo con MacWrite. 


Ogni parola chiave che scrivete (per e- 
sempio PRINT, INPUT, ecc.) viene automa¬ 
ticamente riscritta in lettere maiuscole e in 
neretto. Lo scopo è quello di evidenziare 
la differenza tra le istruzioni del program¬ 
ma e i nomi assegnati alle variabili o alle 
subroutine. 

Quando raggiungete il Iato destro, il vi¬ 
deo si sposterà orizzontalmente e continue¬ 
rà a visualizzare i caratteri che scriverete 
sulla stessa riga. Questo è necessario per¬ 
ché ogni linea di programma consiste in u- 
na sequenza di caratteri seguita da un "car- 
riage return". Non battete <Retum> fino a 
quando non avete introdotto tutta la linea. 

Occasionalmente, una linea del program¬ 
ma di Applicando potrà essere troppo lun¬ 
ga per essere pubblicata senza proseguire 
nella linea successiva; quando ciò sarà ne¬ 
cessario, una linea molto lunga sarà segui¬ 
ta da caratteri che inizieranno dal margine 
sinistro. 

Quando scrivete un programma, sarà 
un'ottima idea usare frequentemente l'op¬ 
zione SAVE nel menu FILE. Inoltre è sem¬ 
pre meglio salvare il programma prima di 
farlo girare. 

Terminata la scrittura del programma e 
salvata la versione definitiva, usate il me¬ 
nu RUN per farlo girare. Molti errori di 
scrittura vengono segnalati con un BEEP e 
un box di messaggio. 

Dopo aver fatto clic sulla parola OK nel 
box, viene evidenziato il listato e la linea 
contenente l'errore viene contornata da una 
finestra. 


Alcuni suggerimenti 

1 - Se date un doppio clic sulla barra del titolo della finestra di List, questa 
si espanderà alle dimensioni dello schermo del Mac. Per riportarla alle normali 
dimensioni date un doppio clic sempre nella barra del titolo. 

2 - Per stampare il listato selezionate la finestra dei comandi dal menu Win- 
dow e scrivete LLIST. Se fate precedere questo comando dall’istruzione LPRINT 
CHR$(27)"Q", l'Imagewriter stamperà il listato in modo compresso. 

3 - Se il vostro programma, per una qualsiasi causa, parte in modo errato, ed 
è necessario fermarlo, potete eseguire il comando di break premendo il tasto 
<COMANDO> e il punto (.) 

4 - Fate particolarmente attenzione alla scrittura delle linee contenenti la pa¬ 
rola chiave DATA. I dati in queste linee possono non causare un errore che 
blocchi il programma, ma possono seriamente compromettere la sua esecu¬ 
zione. 

5 - Non modificate un programma fino a quando non l'avete copiato intera¬ 
mente nella versione pubblicata e gira con successo. Fate una copia del pro¬ 
gramma e lavorate su di, essa. La copia originaria può esservi d'aiuto se commet¬ 
tete degli errori durante le modifiche. 

6 - Se il programma non funziona regolarmente, può esservi d’aiuto togliere 
provvisoriamente le istruzioni ON ERROR GOTO. Questo vi permette di vedere 
i messaggi di errore soppressi dalla routine ON ERROR GOTO. 
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ìhelp 


Peek poke cali 

Locazioni di memoria e chiamate alle subruotine: ve¬ 
diamo quali sono le più interessanti e quelle di uso co¬ 
mune dell'Apple II, He e Ile. I numeri indicati con il 
dollaro ($) sono in notazione esadecimale. 

32 ($20) - Margine sinistro finestra video (0-39) 
normalmente è a 0. Es.: POKE 32,X dove X è la colon¬ 
na sinistra desiderata. PEEK(32)+ PEEK(33) non deve 
superare la larghezza massima del video. 

33 ($21) - Ampiezza finestra video (1-40/1-80). 

34 ($22) - Lato superiore finestra video (0-23). 

35 ($23) - Lato inferiore finestra video (1-24). 

36 ($24) - Posizione orizzontale cursore (0-39). Es. 

POKE36,X posiziona il cursore nella colonna X+l. 

37 ($25) - Posizione verticale cursore (0-23). Es.: 

POKE 37,Y:PRINT lo posiziona alla linea Y+l. 

48 ($30) - Contiene il numero del colore seleziona¬ 

to, in bassa risoluzione (COLOR* 17). 

50 ($32) - Riporta la selezione effettuata per il te¬ 

sto: POKE 50,63 = INVERSE, POKE 50,255 = NOR- 
MAL, POKE 50,127 = FLASH (per ASCII 64-95). 

51 ($33) - Contiene il codice del carattere usato co¬ 

me PROMPT (POKE 51,0:GOTO line#, evita il messag¬ 
gio "Not Direct Command" causato da GOTO line#). 
103-104 ($67-$68) - Contengono la locazione di 

memoria alla quale inizia il programma in Applesoft 
(Per caricare un programma in una locazione -LOC - 
non standard: POKE LOC-1,0: POKE 103,LOC-IN- 
T(LOC/256)*256: POKE 104,INT(LOC/256, quindi 
LOAD). Attenzione: il comando FP (solo in DOS 3.3) 
riporta la locazione di inizio del programma ci suo va¬ 
lore normale 2049 ($801). 

105-106 ($69-$6A) - LOMEM (E' l'inizio dello 

spazio per le variabili, equivalente alla fine del pro¬ 
gramma). Può essere cambiato con LOMEM: 

107-108 ($6B-$6C) - Inizio spazio per le matrici. 

109-110 ($6D-$6E) - Fine spazio per le matrici. 

111-112 ($6F-$70) - Inizio spazio per le variabili 
stringa. —. 

115-116 ($73-$74) - HIMEM (Himem-1 è l'indiriz¬ 
zo valido più alto usato da un programma in Apple¬ 
soft). Può essere cambiato con il comando HIMEM: 
117-118 ($75-$76) - Contiene il numero di linea, 

di un programma in Applesoft, che è stata eseguita. 
119-120 ($77-$78) - Contiene il numero di linea 

quando un programma in Applesoft viene fermato. 

121-122 ($79-$7A) - Contiene il numero della li¬ 

nea che si sta eseguendo. 

123-124 ($7B-$7C) - Contiene il numero della li¬ 

nea con l'istruzione DATA. 

125-126 ($7D-$E) - Successivo indirizzo DATA. 

175-176 ($AF-$B0) - Contiene la locazione di me¬ 
moria di fine del programma in Applesoft. 

214 ($D6) - RUN Flag (POKE 214,255 pone ogni 

comando uguale all'istruzione RUN). 

216 ($D8) - ONERR Flag (Es: POKE216,0 elimina 

la funzione ONERR). 

218-219 ($DA-$DB) - Numero della linea Basic 
dove è avvenuto l’errore rilevato dalla routine ONERR. 

222 ($DE) - Codice dell’errore rilevato da ONERR. 
224-225 ($E0-E1) - Valore dell’ultima coordinata 
X impostata con HPLOT in alta risoluzione. (0-279). 

226 ($E2) - Valore dell'ultima coordinata Y impo¬ 

stata con HPLOT in alta risoluzione (0-191). 

228 ($E4) - Contiene il valore del colore scelto con 
l'istruzione HCOLOR, in alta risoluzione. (0=0, 42=1, 
85=2,127=3, 128=4, 170=5, 213=6, 255=7). 

230 ($E6) - Valore relativo alla pagina, in Hi-Res, 

scelta (POKE 230,32 seleziona la Pagina 1. POKE 
230,64 la Pagina 2. POKE 230,96 la Pagina 3). 


231 ($E7) - Valore della scala relativa al disegno in 
alta risoluzione, scelto con l'istruzione SCALE. 

232-233 ($E8-$E9) - Contengono la locazione di 

memoria alla quale ha inizio una tavola delle figure. 

234 ($EA) - Rileva una collisione tra figure Hi-Res. 

241 ($F1) - Valore della velocità di scrittura di un te¬ 
sto sul Video, scelta con l’istruzione SPEED. 

249 ($F9) - Valore della Rotazione relativo a una fi¬ 
gura in Hi-Res, scelto con l'istruzione ROT. 

49232(-16304) ($C050) - Modo grafico misto. 
49233(-16303) ($C051) - Modo Testo. 

49234(-16302) ($C052) - Modo Grafica a pieno 
schermo. 

49236(-16300) ($C054) - Pagina 1 dell’Hi-Res. 

49237(-16299) ($C055) - Pagina 2 dell’Hi-Res. 
49238(-16298) ($C056) - Grafica Lo-Res. 

49239(-16297) ($C057) - Grafica Hi-Res. 

Questi interruttori vengono attivati con POKE: Es. PO¬ 
KE 49232,0 seleziona il modo grafico misto. 

49152(-16384) ($C000) - Legge la tastiera. 

49168(-16368) ($C010) - Azzera la lettura della 
tastiera Es a 

10 K=PEEK(49152):IF K>128 THEN 10 

20 POKE 49168,0 

30 PRTNT "Tasto: ”;CHR$(K-128) 

49200(-16336) ($C030) - Produce un click. Es. 
For t=l to 99: B=PEEK(49200): NEXT 
49249(-16287) ($C061) - Rileva se è stato pre¬ 

muto il pulsante PADDLE 0 o il tasto MELA VUOTA. 
49250(-16286) ($C062) - Rileva se è stato pre¬ 

muto il pulsante PADDLE 1 o il tasto MELA PIENA. 
49251(-16285) ($C063) - Rileva se è stato pre¬ 

muto il pulsante PADDLE 2. Es. IF PEEK(49249+ nu¬ 
mero PADDLE) > 127, allora è stato premuto. 

POKE 40193,PEEK(40193)-N: CALL 42964 

- Muove i BUFFER del DOS, in basso di N*256 bytes. 
POKE 44452,N+liPOKE 44605,N - Visualizza 

N nomi di file prima della pausa del catalog. 

POKE 44460,88:POKE 44461,252 - Pulisce lo 

schermo prima di visualizzare il catalog. 

POKE 44505,234:POKE 44506,234 - Visualiz¬ 

za i nomi dei file cancellati, durante il CATALOG. 

POKE 44596,234: POKE 44597,234: POKE 

44598,234 - Elimina la pausa durante il CATALOG. 
POKE 49384,0 - Disattiva il motore del DRIVE. 

POKE 49385,0 - Attiva il motore del DRIVE. 

42350 ($A56E) - Routine del CATALOG. Es. CALL 
42350 effettua il catalog del disco. 

40514 ($9E42) - Modifica il tipo di file HELLO. 
Es. POKE 40514,52 e inizializzazione: il file hello de¬ 
ve essere binario. Se fate POKE 40514,30 il file HEL¬ 
LO deve essere un file di testo (istruzione EXEC). 
43616-43617 ($AA60-$AA61) - Contengono la 

lunghezza dell'ultimo file binario caricato in memoria 
con l'istruzione BLOAD (Nota bene: i dati sono memo¬ 
rizzati nell'ordine Byte basso - Byte alto). Es. se la lo¬ 
cazione 43616 contiene 10 e la locazione 43617 con¬ 
tiene 5, la lunghezza del file è di 510 byte. 

43634-43635 ($AA72-$AA73) - Contengono la 
locazione di partenza dcH'ultimo file binario caricato 
in memoria con BLOAD (I dati sono memorizzati nel¬ 
l'ordine Byte basso - Byte alto). Es. se • la locazione 
43634 contiene 00 e la locazione 43635 contiene 96, 
la locazione di partenza è 9600 (decimale). 

43624 ($AA68) - Numero del DRIVE utilizzato co¬ 
me drive di booting. 

43626 ($AA6A) - Numero dello SLOT al quale è col¬ 
legato il drive utilizzato come drive di booting. 

44033 ($AC01) - Numero della traccia sul disco nel¬ 
la quale è memorizzato il CATALOG. 

46017 ($B3C1) - Numero del volume del Disco. 
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Trasmissione dati: MacTerminal 2.0 

Le principali caratteristiche della versione 2.0 di 
MacTerminal, presentata dalla Apple per accontentare 
i possessori di Mac Plus, riguardano essenzialmente 
la modalità di trasferimento dati, con i relativi proto¬ 
colli, l’emulazione di terminali VT100 e IBM 3278, 
la nuova regolazione della tastiera e i nuovi set di ca¬ 
ratteri in emulazione di terminale. Per quanto riguar¬ 
da la modalità di trasferimento dati, nella finestra di 
dialogo sono state aggiunte alcune nuove opzioni, 
che aumentano i tipi di protocollo da usare e la possi¬ 
bilità di salvare la videata durante una sessione di co¬ 
municazione. Infatti ora è possibile scegliere tra cin¬ 
que protocolli di trasmissione: Testo, MacBinary, Te¬ 
sto Xmodem, Xmodem e MacTerminal; a parte l'o¬ 
pzione Testo, tutti gli altri protocolli sono varianti 
del protocollo Xmodem, quindi operano in forma bi¬ 
naria ed effettuano il controllo degli errori: l'uso di ta¬ 
li protocolli sarà d'aiuto nel caso che l’altro computer 
con cui si è collegati supporti tale protocollo. 

Usando MacBinary, Testo Xmodem o Xmodem, 
per ricevere un documento bisogna scegliere dal me¬ 
nù Archivio l'opzione Ricevi Documento, e, al con¬ 
trario di quanto avviene con l'opzione solo testo, il 
documento in ricezione non viene visualizzato ma è 
trasferito immediatamente al Finder mentre appare u- 
na finestra con un contatore che indica la progressio¬ 
ne della trasmissione. Ma vediamo in dettaglio le ca¬ 
ratteristiche dei vari protocolli di trasmissione: 

• Testo. Il protocollo testo va usato per trasferire 
documenti di solo testo verso o da qualsiasi computer 
che non supporti il protocollo Xmodem, in modo 
che i documenti vengono spediti o ricevuti come ca¬ 
ratteri ASCII. 

• MacBinary. Serve a trasferire documenti di Ma¬ 
cintosh (testi, applicazioni o documenti dì sistema) 
verso o da qualsiasi computer che supporti il proto¬ 
collo Xmodem. 

• Testo Xmodem. Questo protocollo va usato 
per trasferire documenti di solo testo verso o da qual¬ 
siasi computer che non supporti il protocollo Xmo¬ 
dem; la differenza dal modo solo Testo consiste nel 
fatto che con questo protocollo si possono gestire 
controlli sugli errori e che si garantisce un invio o u- 
na ricezione di paragrafi nel formato corretto tramite 
l’inserimento o l'eliminazione di avanzamenti riga do¬ 
po ogni a capo. 

• Xmodem. Da usare per inviare i dati senza ag¬ 
giustamenti. 

• MacTerminal. Tale opzione va impiegata per 
trasferire qualsiasi tipo di documento tra due Macinto¬ 
sh, senza doversi preparare a Inviare o Ricevere docu¬ 
menti; ovviamente esso va usato anche quando l'al¬ 
tro computer non sia un Macintosh ma possa emula¬ 
re MacTerminal (Unix, MacPut e MacGet). 

Per quanto riguarda l'emulazione di terminali, è sta¬ 
ta introdotta l'opzione Salva il video; infatti quando 
Macterminal sta emulando un terminale IBM 3278 o 
DEC VT100, scegliere tale opzione prima di un 
Clear fa sì che il programma salvi il contenuto di o- 
gni videata prima di cancellarla: ovviamente l'opzio¬ 
ne Registra le righe a monte presente nel menù Co¬ 


mandi deve essere attivata. Per visualizzare le scher¬ 
mate precedenti basta usare la barra di scorrimento, 
mentre per visualizzare una schermata alla volta basta 
fare click nella parte grigia della barra di scorrimento 
verticale. Bisogna però fare attenzione nell'usare que¬ 
sta opzione, poiché alcune applicazioni, specialmente 
quelle che utilizzano l’intero video, aggiornano fre¬ 
quentemente lo schermo e, di conseguenza, ci si tro¬ 
va a immagazzinare velocemente una grande quantità 
di dati sul disco, e quando questo si è riempito Mac- 
Terminal disattiva il comando Registra le righe a 
monte e smette di salvare le schermate sul disco. Per 
risolvere ciò è sufficiente scegliere dal menù Archi¬ 
vio l'opzione Registra col nome... e salvare il docu¬ 
mento su un altro disco vuoto: attivando nuovamente 
il comando Registra le righe a monte i dati entranti 
verranno salvati nel nuovo documento. 

In questa versione il menù Regolazioni ha una nuo¬ 
va opzione chiamata Tastiera; scegliendo tale coman¬ 
do appare una finestra di dialogo relativa alla configu¬ 
razione della tastiera, e in più si può settare il tasto 
di Backspace che può sia cancellare che tornare indie¬ 
tro di un carattere, e in accoppiata col tasto Comando 
si può alternare in queste due funzioni. 

Infine sòno stati aggiunti dei nuovi caratteri dispo¬ 
nibili sulla tastiera italiana scegliendo il set di caratte¬ 
ri US in emulazione VT100, mentre per quanto ri¬ 
guarda l'emulazione di un terminale IBM 3278 la bar¬ 
ra spaziatrice genera uno short break se usata col ta¬ 
sto comando, oppure un long break se usata con i ta¬ 
sti comando e opzione. Ricordiamo inoltre che sele¬ 
zionando il terminale VT100 ANSI o VT52 è possi¬ 
bile attivare la funzionalità di alternate keypad di 
VT100 o VT52 esattamente come su tali terminali, 
battendo la sequenza ESC = RETURN; per disattivar¬ 
la invece è sufficiente battere la sequenza ESC < RE¬ 
TURN, ma per ulteriori dettagli è meglio far riferi¬ 
mento ai manuali d’uso di questi terminali. 

Vediamo ora qualche suggerimento utile per un 
miglior uso di MacTerminal versione 2.0. 

• Documento Hard Disk. Se avete un disco ri¬ 
gido e questo è collegato alla porta modem, usate il 
documento Hard Disk contenuto sul disco program¬ 
ma MacTerminal; non è necessario usare questo docu¬ 
mento, ovviamente, se il vostro disco rigido si colle¬ 
ga a Mac attraverso la porta stampante o l’uscita del¬ 
l’unità disco esterna. 

• Switcher. Con Switcher, MacTerminal richie¬ 
de una configurazione minima di 128K, ma è preferi¬ 
bile usare una configurazione di 140K. 

• Tasti opzione. Per i comandi Reset e Non re¬ 
gistrare le righe a monte, si possono evitare i messag¬ 
gi di conferma tenendo premuto il tasto comando du¬ 
rante la scelta dell'opzione desiderata. 

• Dimensione degli appunti. La capacità 
massima degli appunti con MacTerminal è di 32000 
caratteri, equivalenti a circa 16 pagine di testo con in¬ 
terlinea singola. 

• Ricevi documento. Va scelta questa opzione 
dal menù Archivio prima di ricevere documenti quan¬ 
do si usano i protocolli MacBinary, Testo Xmodem 
e Xmodem. 

Alfonso Scoppetta 
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a^lplettere 


Cucina, borsa 
e medicina 

Sono un abbonato alla 
vostra rivista Applicando 
che, pur apprezzabile nel¬ 
la sua globalità, non è 
scevra di piccole pecche 
che spesso disorientano 
chi, come me, si diletta 
(e si accanisce poi) a co¬ 
piare i listati dei program¬ 
mi che a mano a mano 
vengono pubblicati nei 
vari numeri della rivista. 

Ho già scritto altre vol¬ 
te lamentando gli incon¬ 
venienti che spesso si 
evidenziano dalla copia¬ 
tura dei listati. Mi è sta¬ 
to risposto tramite la rivi¬ 
sta stessa, anche se non 
sempre con sollecitudine, 
e spero che anche questa 
volta vogliate chiarire i 
dubbi che qui appresso vi 
manifesto e i chiarimenti 
dovuti per poter usare i 
vari programmi da me co¬ 
piali. 

1 - A suo tempo ho co¬ 
piato il programma Inve- 
stor che, credo, gira rego¬ 
larmente. Tuttavia, come 
si evince dalle figure pub¬ 
blicate sulla rivista, pare 
certo che, per far girare il 
programma nella sua inte¬ 
rezza, occorre la scheda 
80 colonne (cosa che non 
mi sembra precisata nel¬ 
l’articolo esplicativo del 
programma). 

Tuttavia, ora che ho 
comprato detta scheda, 
mi accorgo che il pro¬ 
gramma non dà risposta 
ai "resoconti” (analisi di 
rendimento, analisi delle 
vendite, analisi di merca¬ 
to eccetera). 

2 - Dal numero 
15/1985 ho copiato il 
programma Cuisine. An¬ 
che in questo articolo 
esplicativo non fate men¬ 
zione esatta della configu¬ 
razione del sistema neces¬ 
sario per far girare il pro¬ 
gramma. Questo, infatti, 
non mi pare che giri com¬ 
pletamente. Stanco delle 
prove non ho più cercato 


di usarlo! Nel numero 
18/1985, a pag. 90, nel- 
l'articoletto ProDos e 
computer Cuisine, a pro¬ 
posito di detto program¬ 
ma viene detto: "occorre 
inoltre ricordare che que¬ 
sto programma funziona 
solo con la scheda 80 co¬ 
lonne”. 

Ma il programma non 
gira correttamente dopo 
che ho acquistato la sche¬ 
da 80 colonne con soft 
switch (sono in posses¬ 
so infatti di un Apple 
Plus). 

3 - Il programma Ap- 
pliArchitect, quando lo si 
fa girare per costruire i 
vari elementi di una stan¬ 
za, dà subito "Buffer esau¬ 
rito" dopo pochi elemen¬ 
ti inseriti nella stanza. 
L’ho fatto girare alla vo¬ 
ce "R", ma, anche dopo 
che si esaurisce detta fun¬ 
zione, al massimo si rie¬ 
sce a disegnare uno o due 
nuovi elementi e poi nuo¬ 
vamente "Buffer esauri¬ 
to" senza più espletare al¬ 
tre funzioni di riorganiz¬ 
zazione. 

4-11 programma Ap- 
pliMedic, copiato, rivi¬ 
sto e ricontrollato, non 
presenta errori di copiatu¬ 
ra. Tuttavia appena viene 
richiesto di "creare un 
nuovo file cliente", inse¬ 
rito il nome del cliente il 
programma dà errore 16 
alla linea 5180 che, lista¬ 
ta, viene presentata tron¬ 
cata come appresso: IF 
FL... 

Ripristinata la linea 
5180 così come risulta 
nel listato, e fatto girare 
nuovamente il program¬ 
ma, ritorna a presentarsi 
l’errore di cui sopra. 

Inoltre, come si evince 
dal listato in parola, le li¬ 
nee 1060, 1310, 1860, 
1890,3690 e 4680 termi¬ 
nano con un segno di due 
punti, cosa che a me 
sembra impossibile. For¬ 
se mancano successive 
istruzioni? E’ corretta 
inoltre la linea 2120? Mi 


sembra che possa manca¬ 
re qualcosa a questo pun¬ 
to : print + 1$ (M 2);:. 

Francesco De Vito 

Anche se noi di Appli¬ 
cando ci impegnamo fino 
all'impossibile per ridur¬ 
re la percentuale di errore 
a zero, a volte qualcosa 
sfugge alla nostra atten¬ 
zione; ma le possiamo as¬ 
sicurare che è veramente 
raro che succeda. 

D'altro canto i lettori 
troppo spesso non leggo¬ 
no attentamente l'articolo 
riguardanteilprogramma 
e le istruzioni in esso 
contenute e, se il pro¬ 
gramma copiato dalla ri¬ 
vista non gira al primo 
colpo, ne danno tout 
court la colpa a chi lo 
pubblica, attribuendogli 
anche lo scopo di vendere 
cosi più dischetti con il 
programma registrato e 
funzionante. Non è il no¬ 
stro caso. 

E veniamo ai suoi pro¬ 
blemi: 

1 - A pag. 38 del n. 5 
di Applicando, seconda 
colonna, quindicesima ri¬ 
ga, sta scritto: Iprimi tre 
prospetti sono disponibi¬ 
li sia sullo schermo, sia 
su stampante (se si ha la 
scheda 80 colonne). 

2 - Nell'articolo relati¬ 
vo al programma Compu¬ 
ter Cuisine non avevamo 
indicato che funzionava 
soltanto in presenza della 
scheda 80 colonne. 

Tuttavia durante la co¬ 
pia tura, trovandosi inpre - 
senza di un'istruzione co¬ 
me PRINT D$;”PR#3", 
poteva forse capire che 
serviva per attivare la 
scheda a 80 colonne. La 
scheda 80 da lei acquista¬ 
ta probabilmente non vie¬ 
ne attivata con l'istruzio¬ 
ne PR#3, che invece è 
perfettamente funzionan¬ 
te con le schede originali 
Apple. Lei ben compren¬ 
de che non è possibile 
che i programmi com¬ 
prendano tutte le opzioni 


possibili riguardo le mi¬ 
gliaia di stampanti in cir¬ 
colazione o le schede va¬ 
rie dpresenti sul mercato, 
più o meno compatibili. 

Non può quindi addos¬ 
sarci la colpa perché i 
programmi non funziona¬ 
no con la scheda in suo 
possesso. 

Controlli sul manuale 
allegato alla scheda in 
quale SLOT viene siste¬ 
mata e con quale istruzio¬ 
ne viene attivata e modifi¬ 
chi le linee del program¬ 
ma nelle quali compare 
l'istruzione PR#3 con l'e¬ 
quivalente per la sua 
scheda. 

3-11 programma Ap- 
pliArchitect è molto va¬ 
sto e utilizza la memoria 
del computer in un modo 
del tutto particolare, defi¬ 
nendo tutti i puntatori 
sia delle variabili che del 
buffer dei dati. A pag. 21 
del n. 21 della rivista è 
spiegata la tecnica usata. 
Deve quindi ricontrollare 
le zone del programma in¬ 
teressanti questi punta¬ 
tori. 

4 - Per quanto riguarda 
il programma AppliMe- 
dic, le linee da lei indica¬ 
te come terminanti con i 
due punti sul numero in 
nostro possesso sono 
complete di istruzione. O 
lei ha sbagliato program¬ 
ma oppure è in possesso 
di una rivista incomple¬ 
ta. In quest'ultimo caso 
la preghiamo di spedirce¬ 
la: le sarà inviato un nu¬ 
mero con la stampa 
esatta. 

L'unico errore che ab¬ 
biamo commesso è alla 
linea 2120 che va così 
corretta : 

:PRINT "$" + I$(M2) ;:. 

Nel caso le nostre ri¬ 
sposte non la soddisfino, 
ci invii pure una copia 
del dischetto con i listati 
daleicopiatiedeffettuere- 
mo il controllo degli er¬ 
rori. 
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Un portatile 
da collegare 

Seguo con molto inte¬ 
resse la vostra rivista an¬ 
che se l'Apple II e il Ma¬ 
cintosh che uso non so¬ 
no di mia proprietà: mi 
vengono di volta in volta 
concessi in uso da amici, 
per la modesta attività 
pubblicistica e di scritto¬ 
re per il teatro che svol¬ 
go come hobby essendo 
impegnato professional¬ 
mente nel campo delle as¬ 
sicurazioni. Il mio quesi¬ 
to è questo: 

- ho letto con interesse 
il numero della vostra ri¬ 
vista dedicata in gran par¬ 
te all'editoria supportata 
da Macintosh e, contem¬ 
poraneamente, il libro di 
Claudio Pozzoli "Come 
scrivere la tesi di laurea 
con il personal compu¬ 
ter" dove si sostiene, giu¬ 
stamente, che con un 
computer Olivetti M 24 
e un idoneo software si 
può risolvere in maniera 
ottimale una attività edi¬ 
toriale. 

- mi capita sempre più 
spesso di consultare testi 
in pubbliche biblioteche 
o articoli e saggi, o, più 
semplicemente, di sentire 
la necessità di prendere 
un appunto veloce su di 
una idea da sviluppare; sa¬ 
rebbe estremamente utile 
per questo avere un blo- 
ck-noteselettronicotasca- 
bile o portatile come Oli¬ 
vetti MIO o Sharp PC 
5000, Texas, Ericsson, e 
il preannunciato Toshiba 
portatile, per poi trasferi¬ 
re i dati direttamente nel¬ 
le schede del Mac. 

Avvicinandosi il mo¬ 
mento di una mia scelta 
per una macchina perso¬ 
nale che vedrei orientata 
verso il nuovo Macin¬ 
tosh Plus, posso sperare 
in un vostro aiuto, anche 
a puro titolo orientativo, 
sul problema del trasferi¬ 
mento di dati raccolti da 
un computer portatile a 


un Mac? Ho scartato l'i¬ 
dea di utilizzare un Apple 
con visore a cristalli li¬ 
quidi per l'impossibilità 
di avere una stampante in¬ 
corporata. 

Roberto Marchesi 
Voghera (PV) 

La soluzione migliore, 
dovendo operare nel cam¬ 
po del word processing 
sofisticato, è l'accoppiata 
Macintosh Plus e stam¬ 
pante Image, che potreb¬ 
be rivelarsi utile anche 
perché Macintosh è una 
macchina molto versatile 
sulla quale è estremamen¬ 
te facile trasferire file di 
testo scritti con altre mac¬ 
chine. 

E un Olivetti MIO po¬ 
trebbe rivelarsi un otti¬ 
mo blocco note portatile 
in grado di risolvere la 
maggior parte dei suoi 
problemi. 

Due Macintosh 
al telefono 

Possiedo un Macin¬ 
tosh 512 con drive ester¬ 
no. Vi chiedo: 

1) Quali tipi di modem 
possono essere allacciati 
al mio computer più con¬ 
venientemente e agevol¬ 
mente, soprattutto con ca¬ 
vi forniti direttamente dal 
costruttore? 

2) Quale programma 
occorre acquistare? 

3) La presa del telefo¬ 
no è installata in una 
stanza diversa da quella 
nella quale opero con il 
Mac; c'è una distanza di 
circa 10/12 metri: esisto¬ 
no prolunghe oppure ciò 
costituisce ostacolo insor¬ 
montabile? 

4) Possiedo un altro 
Mac 512 K in studio (al¬ 
tro immobile): è possibi¬ 
le un collegamento fra i 
due apparecchi? 

5) Quale modem (e a 
quanti baud) suggerite 
per il Mac, tenendo con¬ 
to del fatto che, al mo¬ 


mento, non ho esigenze 
di collegamenti interna¬ 
zionali ma, per esempio, 
con la Corte di Cassazio¬ 
ne in Roma? 

6) E' possibile detto 
collegamento? 

7) E' possibile (e, in 
caso positivo, come) ope¬ 
rare sul Mac con i pro¬ 
grammi allegati al n. 3 
di Super Apple? 

8) Ho inserito nel pro¬ 
gramma My Office un 
numero di documenti 
che mi ha lasciato libero 
solo 1 K; ora dovrei far 
passare i documenti dal 
cassetto in alto dello 
schedario a quello in bas¬ 
so; il programma si rifiu¬ 
ta per difetto di memoria: 
esiste un sistema per evi¬ 
tare di ricopiare i docu¬ 
menti? 

Avv. Bruno M. 

Giordano - Milano 

Recentemente Appli¬ 
cando ha dedicato un inte¬ 
ro articolo ai collegamen¬ 
ti per la trasmissione dati 
via modem e il collega¬ 
mento con varie banche 
dati, compresa quella del¬ 
la Corte di Cassazione. 
Per maggiori informazio¬ 
ni e ulteriori dettagli le 
suggeriamo di mettersi 
in contatto con l'autore 
dell'articolo, Alfonso 
Scoppetta, presso la New 
Line di Milano (telefono 
02 4697205). 

Per quanto concerne in¬ 
vece il problema di spa¬ 
zio relativo al suo di¬ 
schetto di My Office, sa¬ 
rebbe opportuno che rico¬ 
piasse i dati (e solo quel¬ 
li) su un dischetto nuo¬ 
vo, e quindi operasse con 
il dischetto programma 
inserito nel drive interno 
e quello contenente i soli 
dati nel drive esterno. 

I problemi 
dell'espansione 

Possiedo un calcolato¬ 
re Lemon I (Apple 11+ 


compatibile) con memo¬ 
ria di 64K. Recentemente 
vi ho inserito una scheda 
80 colonne con soft- 
switch SMARTEM ver¬ 
sione 1.1. 

Vi sarei molto grato se 
poteste aiutarmi nel risol¬ 
vere i seguenti problemi 
che incontro quando uti¬ 
lizzo il compilatore Pa¬ 
scal per l'Apple con tale 
scheda: 

1 - Usando i normali 
comandi di attivazione 
del modo grafico dell’Ap- 
ple-Pascal non si passa 
automaticamente da 80 a 
40 colonne. Infatti pro¬ 
vando il programma 
GRAFDEMO contenuto 
nel dischetto APPLE 3 
del compilatore Pascal 
versione 1.0 oppure 1.2 
non riesco a visualizzare 
laBUTTERFLY disegna¬ 
ta dal programma, ma ri¬ 
mango nel modo testo a 
80 colonne. Come potrei 
fare per risolvere il pro¬ 
blema? 

2 - Usando il compila¬ 
tore Apple-Pascal versio¬ 
ne 1.2 sempre con la 
SMARTERM all'incon¬ 
veniente indicato nel pun¬ 
to 1 si aggiunge il seguen¬ 
te: il campo dei comandi 
dell'editor (E)dit, F)ile, 
R)un,...) viene abbassato 
di qualche riga con la con¬ 
seguenza che scritte suc¬ 
cessive possono apparire 
al di sopra di esso. E' 
possibile ovviare all'in¬ 
conveniente? 

Paolo - Como 

Purtroppo il compilato¬ 
re Pascal Apple versione 
1.1 e successive permette 
l'uso corretto delle 80 co¬ 
lonne e della grafica sola¬ 
mente su una piastra Ap¬ 
ple li originale, mentre 
in altri casi si possono 
verificare inconvenienti 
come quelli da lei lamen¬ 
tati, soprattutto nell'uso 
della grafica e nell'uso 
del compilatore nella ver¬ 
sione 1.2 del Pascal 
Apple. 
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Un one>liner 
che gira sempre 

Acquisto regolarmente 
la vostra rivista e copio 
gli one-liners; come pos¬ 
so metterli all'inizio di 
un programma? Ho pro¬ 
vato, ma: o gira sempre 
l'one-liner, oppure tutto 
si ferma. 

Gian Santoro 
Trana (TO) 

Gli one-liner sono dei 
piccoli programmi a sé e 
qualcuno di essi ha come 
ultima istruzione un ri¬ 
mando all'inizio per ren¬ 
derlo continuo. 

Per inserirli in un pro¬ 
grammavamo considera¬ 
ti come una subroutine e 
quindi nel programma oc¬ 
corre un'istruzione GO- 
SUB che rimandi alla li¬ 
nea dove viene inserito 
ione-liner e un RE¬ 
TURN alla linea che se¬ 
gue immediatamente io¬ 
ne-liner stesso. 

Per quelli che continua¬ 
no a girare, occorre to¬ 
gliere il riferimento che 
rimanda all'inizio. 

L'Apple-Pascal 
e la scheda 

Ho comprato da poco 
l'espansione a 128 Kb, 
con il proposito di usarla 
soprattutto con l’Apple 
Pascal. 

La versione che ho del¬ 
l'Apple Pascal è la 1.2, 
ossia quella che permet¬ 
te, con l'uso degli oppor¬ 
tuni System.Apple e 
System.Pascal messi a di¬ 
sposizione, di creare un 
sistema in grado di sfrut¬ 
tare i 128 Kb di memo¬ 
ria. Il problema è che, 
malgrado i miei tentati¬ 
vi, non sono riuscito a 
combinare nulla: quando 
cerco di fare il bootstrap 
del nuovo sistema da 
128 Kp il computer si 
blocca e appare sempre il 
solito errore: Extended 
80-column Cardrequired. 


Tutto ciò malgrado la 
schedarichiesta siacorret- 
tamente installata nello 
slot 3. Ho inoltre prova¬ 
to a posizionare l’espan¬ 
sione a 128 Kb in slot di¬ 
versi da quello indicato 
(anche nello slot 0 al po¬ 
sto della Language card) 
ma con lo stesso risulta¬ 
to. 

Vorrei quindi sapere se 
con le schede in mio pos¬ 
sesso posso creare un si¬ 
stema da 128 Kb e, se sì, 
come devo posizionare le 
schede. In caso contrario 
non si può modificare il 
System.Pascal (con blo- 
ckread e blockwrite) in 
mododarendernepossibi- 
le il funzionamento an¬ 
che su Apple II plus? 

Franco Viani 
Imperia 

Purtroppo L'Apple-Pa¬ 
scal 1.2 riconosce solo la 
scheda APPLE da 80 co¬ 
lonne con espansione e 
non attiva le altre schede 
di memoria aggiuntiva 
come memoria di lavoro 
ma le riconosce come di¬ 
schi virtuali. 

Forse ci vuole 
un ponticello 

Sono un vostro abbo¬ 
nato, possessore di Ile 80 
col+64K con C.P.V. 
6502, e scrivo per chie¬ 
dervi alcuni chiarimenti 
riguardo a un program¬ 
ma. Insieme ad alcuni 
amici ho comperato il 
programma di grafica in 
doppia Hi-res Dazzle 
Draw, ma sebbene esso 
sia dichiarato come fun¬ 
zionante su Ile e Ile- 
128K abbiamo constata¬ 
to che gira perfettamente 
solo sul Ile mentre sul 
mio Ile l’immagine viene 
riprodotta come se la dop¬ 
pia Hi-res non fosse atti¬ 
vata e cioè piena di stri¬ 
sce nere verticali che la 
rendono irriconoscibile; 
ovviamente anche tutti i 
menù pull-down sono il¬ 


leggibili. Aggiungo che 
ho una scheda 80 
col+64K non originale 
che però non mi ha mai 
dato problemi con pro¬ 
grammi vari (tipo Apple 
Works, Apple Writer, Pa¬ 
scal 1.2, CFS, PFS, Ga- 
to ecc.) e che XPS DIA- 
GNOSTIC mi ha segnala¬ 
to perfetta; c'è di più: un 
mio amico, che ha la 
scheda originale, ha gli 
stessi problemi. Sapete 
dirmi da che cosa dipende 
tale problema? O forse 
non è vero che il pro¬ 
gramma gira anche su Ile 
con 6502? 

Vi ringrazio e porgo i 
miei più sinceri compli¬ 
menti per la vostra ma¬ 
gnifica rivista. 

Oronzo Retino 
Brindisi 

Nelle schede 80 colon¬ 
ne originali, per attivare 
la doppia Hi-Res, occorre 
inserire un piccolo ponti¬ 
cello, fornito con la sche¬ 
da, in due piedini situati 
nellaparte anteriore della 
scheda stessa. Potrebbe 
essere la stessa cosa per 
la sua scheda non origina¬ 
le. Tuttavia la doppia Hi- 
Res funziona solo con le 
piastre Apple il cui nu¬ 
mero di matricola termi¬ 
na con la lettera B. 

Come attivare i 
programmi in Im 

Sono un abbonato di 
Applicando e possessore 
di un Apple II Europlus. 
Leggo con interesse la 
vostra rivista e ho prova¬ 
to a caricare i programmi 
da voi pubblicati. 

Purtroppo però quelli 
in linguaggio macchina 
non riesco a farli funzio¬ 
nare e, provando a listarli 
con il mini-assemblato¬ 
re, alcune istruzioni dan¬ 
no ???. Può dipendere da 
diversità dovute al tipo di 
macchina? 

Silvano Vuerich 
Sacile (PN) 


I programmi in lin¬ 
guaggio macchina vengo¬ 
no attivati con l'istruzio¬ 
ne BRUN oppure vengo¬ 
no caricati in memoria 
con l'istruzione BLOAD 
e quindi il run viene dato 
o con l'istruzione CALL 
seguita dal numero della 
locazione di partenza del 
programma (in decimale) 
oppure da ambiente moni¬ 
tor scrivendo il numero 
della locazione di parten¬ 
za (in esadecimale) segui¬ 
to dalla lettera Geda RE¬ 
TURN. 

Disassemblando un li¬ 
stato in linguaggio mac¬ 
china, quelle che indica¬ 
no ??? non sono istruzio¬ 
ni per il microprocesso¬ 
re: potrebbero essere dei 
byte messi in quelle loca¬ 
zioni di memoria e quin¬ 
di confrontati con altri 
nel corso del programma. 
Il He e il 11+, per quanto 
riguarda le locazioni di 
memoria, sono uguali. 

Meandro gira sul 
Personal Kid? 

Possiedo un Personal 
Kid compatibile Apple e, 
essendo interessato all'ac¬ 
quisto dell'adventure ga¬ 
me Il dominio di Mean¬ 
dro, vorrei sapere se tale 
programma funziona sul 
mio computer. 

Enrico Lenti - Iesi 

II dominio di Meandro 
funzionerà sul suo com¬ 
puter se questo accetta 
sia i caratteri maiuscoli 
sia quelli minuscoli, per¬ 
ché le informazioni sull'a- 
dventure game sono scrit¬ 
te tutte in minuscolo. 

Diapositive sì, 
ma solo tredici 

Ho comprato a settem¬ 
bre un Apple Ile e devo 
dire che ne sono molto 
soddisfatto. Da allora so¬ 
no diventato un indefesso 
lettore della vostra rivista 
e ho avuto modo di sco- 
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prire lati nascosti del 
mio computer.Vi chiedo 
ora un piccolo aiuto: leg¬ 
gendo l'articolo "Diaposi¬ 
tive sì, ma a stato soli¬ 
do" su Applicando n. 23, 
non ho capito come ope¬ 
rare per caricare 16 figure 
(possiedo le 80 colonne) 
e mostrarle. 

Mario Battacchi 
Bologna 

Con la scheda 80 co¬ 
lonne (se comprende la 
memoria aggiuntiva di 
64K) si possono caricare 
un massimo di 13 imma¬ 
gini, come è spiegato a 
pag. 78 della rivista. Le 
immagini devono essere 
salvate come file unico a 
blocchi di 3 (pag. 81). 


Quindi si utilizza il pro¬ 
gramma SHOW .HELLO 
adattandolo allo scopo 
(pag. 81) per caricare in 
memoria le immagini e 
il programma SHOW.5 
per mostrarle. 

Attenzione 
al puntatore & 

Posseggo da circa due 
mesi un Apple Ile. Man¬ 
cando di una scheda orolo¬ 
gio, ho digitato con pa¬ 
zienza i programm i conte¬ 
nuti in A che ora nasce il 
file su Applicando n. 24. 
Purtroppo il programma 
STARTUP non vuole sa¬ 
perne di girare e continua 
a darmi un S YNTAX ER- 
ROR IN 150. Ho allora 


ricontrollato tutti i listati 
facendo particolarmente 
attenzione alle istruzioni 
riguardanti il cambiamen¬ 
to di indirizzo del pro¬ 
gramma DATE.TIME 
(per digitare programmi 
in Assembler devo infatti 
entrare in Monitor, dal 
momento che non pos¬ 
seggo il TOOL KIT). 
Forse è proprio questo il 
motivo del mio errore? 

Alessandro Zolla 
Milano 

Innanzi tutto va specifi¬ 
cato che il programma in 
questione funziona solo 
in ProDos e non, come 
erroneamente da noi indi¬ 
cato all'inizio dei listati, 
anche in DOS 3.3. 


A linea 150, dopo i 
due punti, c'è una & che 
viene utilizzata per attiva¬ 
re la routine della data e 
dell'ora. Probabilmente 
lei ha commesso un erro¬ 
re nella copiatura del pro¬ 
gramma DATE.TIME in 
linguaggio macchina, so¬ 
prattutto nelle linee dove 
si definisce il puntatore 
&. Per copiare questi li¬ 
stati è giusto andare in 
Monitor e copiare i nu¬ 
meri (un massimo di tre 
coppie) che compaiono 
alla sinistra dei due pun¬ 
ti. Dovrebbe controllare 
bene il cambio di indiriz¬ 
zo e verificare che le loca¬ 
zioni 3F5 3F6 3F7 con¬ 
tengano rispettivamente 
4C 00 97. 


IL MERCATINO DELLE MELE 


• VENDO drive aggiuntivo da 140 K a L. 450.000. 
Giovanni Zanuso, Via A. Diaz 8r - Valleggia (SV). 
Tel. 019/882508 ore pasti. 

• VENDO Unidisk, 800K a L.800.000, compreso 
scheda controller. Vendo Disk driver 5" a L. 
400.000. Renzo Martignan, Via Adriatico 6 - Vare¬ 
se. Telefono 0332.261059. 

• OCCASIONE Vendo Apple He utilizzato pochis¬ 
simo, completo di disck drive aggiuntivo, monitor 
professionale Apple 12", mouse, borsa originale Ap¬ 
ple, 2 alimentatori, joystick Apple e regalo molto 
software originale e 100 dischi vergini., valore oltre 
4.000.000 , a lire 2.500.000 trattabili. Passamonti, 
via Tadino 42 Milano. Telefono 02/2718768. 

• VENDO Apple De completo di monitor m fosfori 
verdi, drive, scheda 80 colonne ed espansione memo¬ 
ria a 128 Kb, joystick + software tra il più famoso: 
Applewriter Prodos, Appleworks Multiplan, Visicalc 
Advance, Pascal 1.2, Copy II plus, Graforth, Assem¬ 
bler 6502 Prodos, Pixit, The Graphic Solution, De¬ 
sign Lab, Lode Runrter Championshap, simulatore di 
volo, regata e tantissimi altri programmi. Francesco 
Tottolo, Via Don G. Santinon 28 - Carbonera (TV). 
Telefono 0422/396279. 

• VENDO causa passaggio sistema superiore Apple 
De espanso a 128 K 80 CI. + profile 10Mb + 20 dri¬ 
ve + monitor fosfori ambra + Mouse He + Joystik. Il 
tutto con i seguenti manuali: Utente, Integer Basic, 
Applesoft, DOS 3.3., Pascal Profile Manager, Ba¬ 
ckup II, Apple Mouse II, 80-Column Text Card, 
Extended 80-Column Tex Card Supplement. Cedo 
inoltre molti programmi utility e routine con i ma¬ 
nuali quali: Applework, Apple Writer E, Apple Plot, 
Locksmith 5.0, Merlin, MousePaint, Koala, Pascal, 
Fortran, Dos 3.3, Pro-dos, Ram Drive, Doublé Reso¬ 


lution e tanti giochi. Marco Crosi, Via M. Patrioti 
64 - Malnate (VA). Tel. 0332/425448. 

• VENDO Apple ImageWriter a L. 1.000.000. Tele¬ 
fonare a Rosi, 0331/592292, ore ufficio. 

• VENDO computer Apple Ile 128K, monitor De - 
supporto monitor, stampante scribe, borsa, joystick, 
programma Appleworks, materiale vario. L. 
2.500.000. Francesco De Simone, Via Castel Morro- 
ne 2 - Milano. Tel. 032/7421543 ore 21.00. 

• VENDO per passaggio a sistema superiore Apple 
13 64K Comp.100% (Lod. Mouse Ha), con tastiera se¬ 
parata (Multitech MAK Et), Pad numerico, Autore- 
peat, tasti funzioni definibili, + numerosi programmi 
in omaggio. Il tutto come nuovo, perfettamente fun¬ 
zionante a L. 750.000 (trattabili). Vendo anche sepa¬ 
ratamente, senza scopo di lucro, vasta biblioteca (ol¬ 
tre 800) di software per Apple II+, Ile e Ile (WP, Ge¬ 
stionali, Ingegneria, Business, Compilatori - Pro- 
Dos). Gennaro Oricchio, Via San Marco 240, Agro- 
poli (SA). Tel. 0974/822511. 

• VENDO Apple He + monitor He + supporto moni¬ 
tor + modulare RF + stampante EPSON LX 80F/T con 
interfaccia seriale. Pochissimi mesi di vita, con ma¬ 
nuali, imballi originali e 10 dischi con programmi a 
scelta (pacchetti applicativi,. linguaggi, utility, grafi¬ 
ci). Il tutto a L.l.600.000 franco Como. Monitor 
colore 12" TARAX RGB Super Visionili, risoluzione 
640x262, per Apple, IBM ecc. L. 620.000. Salvato¬ 
re Grande, Via Mentana 30 Como. Tel. 031/272042. 

• VENDO Comp.100% Apple E, 64K + 1 drive con 
scheda controller + monitor F.V. 12" + joystick + 
circa 50 programmi. Tutto con imballaggi, manuali e 
garanzia illimitata. Prezzo L. 800.000 trattabili. Mar¬ 
co: telefono 02/5271120. 
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éMsservice 


Listati senza fatica 


Tutti i programmi di Applicando possono essere trascritti e quindi salvati su 
dischetto. Ma la trascrizione è lenta e noiosa, e sbagliare fin troppo facile. Ecco 
perché Applicando offre, già pronti, i dischetti con i programmi autoguidati 
(cioè con le istruzioni), sia per Apple II, sia per Macintosh: per ottenerli, è 
sufficiente inviarci il tagliando (pubblicato nell’ultima pagina) debitamente 
compilato. Chi vuole risparmiare non perda la favolosa offerta dell' 
abbonamento al Disk Service e invii subito il tagliando di pagina 129. 


APPLICANDO 1 

AP1/I02 Profitti. In tempo reale l'analisi del 
break-even point, punto di pareggio di un’a¬ 
zienda. Calendario perpetuo. Dal 1582 in 
poi tutto quello che si può sapere sui giorni 
passati e futuri. I tronchi del tesoro. Una 
spericolata caccia al tesoro a nuoto, tra le insi¬ 
die di tronchi galleggianti. Lire 30.000. 

AP1/N03 Eliminatore di Dos. Uno stru¬ 
mento per aumentare del 10% la capacità di un 
normale floppy disk Orologio. Per trasfor¬ 
mare l'Apple II in un orologio con rintocchi, allar¬ 
me e lancetta dei secondi. Pronti puntare 
fuoco! Guardiano di un castello abbandonato, 
hai 25 colpi da sparare contro gli intrusi. Lire 
30.000. 


APPLICANDO 2 

AP2/IN04 Costi chilometrici auto. Un 
programma per calcolare e confrontare i costi 
di qualunque auto. Richiamafigure. Posizio¬ 
nare, ingrandire, ruotare, cambiare colore, ag¬ 
giungere figure a quelle di una tavola Laser 
nello spazio. Battaglia a colpi di laser con¬ 
tro asteroidi e alieni per difendere la torretta 
spaziale. Lire 30.000. 


APPLICANDO 3 

AP3/IN05 Sistema base. Un data base mo¬ 
dulare con tutte le caratteristiche essenziali 
per mettere ordine nei propri archivi. Eti¬ 
chette. Etichette spiritose e bizzarre, di la¬ 
voro o di ogni genere, stampate facilmente e 
nel numero desiderato. Contratti. Con il 
WPL, il linguaggio di programmazione dell'Ap¬ 
ple Writer, castano cinque minuti per un docu¬ 
mento di più pagine personalizzato. Gran ca¬ 
talogo. Una routine per avere il catalogo del 
dischetto su due colonne, 42 file per volta, e ri¬ 
chiamarli con un solo tasto. Lire 30.000. 

AP3/A06 Equo canone (occorre Visicalc). 
In Visicalc un modello che permette, a inquilini e 
proprietari, l'esatto calcolo dell'equo canone. 
Lire 25.000. 


APPLICANDO 4 

AP4/N07 Lettura sprint (versione italia¬ 
na e versione con frasi in inglese). Un reading 
improver per leggere di più a parità di tempo. 
Rompiquindici. Il piccolo rompicapo delle 
quindici pedine da ordinare nei sedici spazi a di¬ 
sposizione. Tastierino fantasma. Una rou¬ 
tine per avere a disposizione un tastierino nu¬ 
merico anche sull'Apple II. Routine di in¬ 
put. Due sùbroutine, una per i dati numerici, 
l'altra per gli alfanumerici, per il controllo del¬ 
l'input. Lire 30.000. 

AP4/A09 Organo, violino, pianoforte 

(dischetto Pascal, occorre lanauage card o Ap¬ 
ple Ile o Ile). Ecco come, col Pascal, si riesce a 
simulare i tre strumenti attivando l'altoparlan¬ 
te dell’Apple da programma. Lire 30.000 


APPLICANDO 5 

AP5/N08 Investor. In tempo reale il quadro 
esatto di come vanno i propri investimenti fi¬ 
nanziari. Con cinque prospetti riepilogativi e 
52 periodi di quotazione, Investor è uno dei 
programmi più completi in questo settore e in 
assoluto il più economico. Lire 70.000. 

AP5/N09 Agenda personale. Per ricorda¬ 
re ora per ora gli appuntamenti di un anno inte¬ 
ro memorizzando fino a 15 appunti ogni giorno. 
Duello d'artiglieria. Vince chi sa calcolare 
meglio la velocità del vento, la gittate e l’eleva¬ 
zione della canna. Mele e freccette. Versio¬ 
ne computerizzata del popolare gioco delle 
freccette che nulla toglie al gusto del far cen¬ 
tro. Lire 30.000. 


APPLICANDO 6 

AP6/N10 Obbligazioni/Bond Manager. 

Per avere un quadro completo e concreto dei 
rendimenti dei titoli a reddito fisso. Pu- 
cMan/Nibbler. Versione in alta risoluzione 
per Apple del famoso videogame a gettone. Li¬ 
ne finder. Letteralmente trova righe; que¬ 
sta utility permette di localizzare facilmente i 
segmenti di un programma Lire 30.000. 


AP6/N11 Stress. In Pascal (occorre langua- 
ge card o Apple Ile o Ile). Per giocare, ma so¬ 
prattutto per inventare giochi, il programma 
si pone in alternativa agli usuali videogame. Li¬ 
re 55.000. 


APPLICANDO 7 

AP7/N12 Apple pittore. Si possono realiz¬ 
zare sullo schermo capolavori di pittura, otte¬ 
nendo effetti speciali di grande efficacia. Ot¬ 
tovolante. Un tutorial per insegnare ai bam¬ 
bini a riconoscere i numeri che rimbalzano sullo 
schermo. Diskblock. Una routine che permet¬ 
te di evitare che qualche curioso possa avere li¬ 
bero accesso in programmi riservati. Archi¬ 
vio per Apple. Per avere un back-up dei 
programmi più importanti da dischetto a cas¬ 
setta o viceversa. Discoteca. Una banca dati 
che tiene sotto controllo la collezione di LPe 
cassette. Aiuto. Alla fine della battitura di un 
programma, Aiuto vi dirà quanti errori ci sono 
e a quali linee. Lire 30.000. 


APPLICANDO 8 

AP8/N13 Cambiacomandi/Messaggi. Un 

programma che insegna come personalizzare i 
messaggi propri del Dos dell'Apple. Le Man- 
s. Un gran premio di formula uno da giocare in 
due o da soli contro il computer. Appleorga- 
no. Ecco come trasformare Apple// in un melo¬ 
dioso organo. Lire 30.000. 

AP8/T14 Momento di una forza/Colpo 
all'asta. La dimostrazione didattica del ribal¬ 
tamento di un corpo solido appoggiato a un 
piano quando viene applicata una forza orizzon¬ 
tale che supera il momento in senso opposto do¬ 
vuto al peso. Hard copy pagine in alta ri¬ 
soluzione. Se la stampante è compatibile con 
questo programma si possono far miracoli. U- 
re 30.000. 

APPLICANDO 9 

AP9/N15 Fuoco fatuo. Un appassionante a- 
dventure game con un percorso intricatissimo, 
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mille trabocchetti, un troll e una principessa. 
Apple artista. Per destreggiarsi nella gra¬ 
fica ad alta risoluzione usando lo schermo co¬ 
me tavolozza e la tastiera come pennello. Data 
hello. Una semplice routine che permette di di¬ 
sporre di una clock card inizializzando i dischet¬ 
ti con giorno, mese e anno. Lire 25.000. 

AP9/T16 Sistema di forze parallele. 

Fissandone l’intensità e la posizione, questo 
programma permette di visualizzare il centro 
di un sistema di forze sotto forma numerica e 
grafica. Traslazione e rotazione di una 
figura piana. Come far ruotare, traslare, 
rimpicciolire, ingrandire sul video una figura 
piana. Ure 30.000. 


APPLICANDO 10 

AP10/N14 Ripristino. Come ripristinare 
programmi persi per un'accidentale istruzione 
di New o di Fp. Disk Map. Un detective del 
Dos per scoprire dove e come vengono imma¬ 
gazzinati i dati analizzando la mappa dei bit oc¬ 
cupati. Autonumber. Una routine per autonu- 
merare automaticamente i programmi. Lire 
30.000. 

API 0/T 17 Rette nel piano cartesiano. 

Come individuare in cinque modi diversi una 
coppia di rette in un piano cartesiano e avere 
visualizzate le equazioni relative ai piani asse¬ 
gnati. Statistica. Come analizzare la correla¬ 
zione tra due fenomeni mediante l'indice di Bra- 
vais. Ure 30.000. 


APPLICANDO 11 

AP11/N18 Apple edicola Una banca dati 
per avere sotto controllo un articolo, il suo nu¬ 
mero di pagina, la rivista su cui è stato pubbli¬ 
cato. Disk Zap. Il programma indispensabile 
per il debugging. Messaggi personali. 
Quando la persona non c'è basta lasciarle un 
messaggio in Apple//. Comparatore di 
programmi. Per risolvere dubbi sulle diver¬ 
se versioni dello stesso programma in basic. 
Trappola per pochi. Un cacciatore contro 
tre animali feroci. Vince chi nesce a intrappola¬ 
re senza essere intrappolato. Lire 30.000. 

AP11/TI 9 Espressioni. Come risolvere un 
piccolo dramma familiare con l'aiuto di un elabo¬ 
ratore personale. Lire 25.000. 


APPLICANDO 12-13 

API 2/N20 Bridge. Un programma in altissi¬ 
ma risoluzione grafica che permette di impara¬ 
re il bridge o di giocarlo contro il computer. 
Microcalc. Un foglio elettronico di calcolo 
che mette a disposizione 20 righe per 20 colon¬ 
ne, per un totale di 400 caselle da riempire co¬ 
me si vuole. Applesoft Line Editor. Una 
potente utility che permette l'editing dei pro- 

( \ 

Bridge AP12/N20 

Per imparare a giocare 
a bridge o per esercitarsi 
giocando contro il computer 

_ ) 


grammi in Applesoft e aggiunge all'Apple un 
più ampio controllo del cursore. Lire 30.000. 

API 2/A21 Budget (occorre Appleworks). 
Un prospetto che con l'inserimento di dati 
mensili e di medie preventive calcola automati¬ 
camente le medie consultive e i relativi saldi 
mensili e annui. Ure 20.000. 

AP12/A22 Budget (occorre Visicalc). Un 
prospetto che con i’inserimento di dati mensili 
e di medie preventive calcola automaticamente 
le medie consuntive e i relativi saldi mensili e an¬ 
nui. Ure 20.000. 

AP12/T25 Animazione di una rotazione 
tridimensionale. Un esempio di come una ro¬ 
tazione tridimensionale permette di rappresen¬ 
tare gli oggetti proprio come li vediamo. Tra¬ 
sformazione da File a Data. Una utility 
per risolvere il problema di aggiungere a un 
programma preesistente delle istruzioni DA¬ 
TA ricavate da un altro file. Lire 25.000. 


APPLICANDO 14 

AP14/N26 Golf. Un programma in altissima 
risoluzione grafica che permette di disegnare 
il proprio percorso di golf per poi giocarci a 
piacimento. Autopiù. Per'non dimenticare più 
gli appuntamenti fissi dedicati alla manutenzio¬ 
ne della vostra automobile. Lire 20.000. 

AP14/N27 Applebaby. Tre giochi didattici: 
imparare a contare in età prescolastica, ripas¬ 
sare le tabelline, esercitarsi nel l'ortografia. Li¬ 
re 25.000. 

AP14/A28 Rimborso spese (occorre Ap¬ 
pleworks). Un prospetto che permette di pre¬ 
parare le vostre note spese automaticamente. 
Lire 20.000. 

API 4/A29 Rimborso spese (occorre Visi- 
cale). Un prospetto che permette di prepara¬ 
re le vostre note spese automaticamente. Lire 
20 . 000 . 

API 4/T30 Frutteti. Un aiuto a risolvere u- 
no dei più classici problemi di estimo. Instant 
Poster. Scrivete la frase che volete, e subito 
dalla stampante esce un poster gigante. .Lire 
20 . 000 . 


APPLICANDO 15 

AP15/N31 Sintetizzatore di suoni. Do¬ 
tate i vostri lavori di una colonna sonora ecce¬ 
zionale: dal canto dell'uccellino alla mitragliatri¬ 
ce, dal treno in corsa all'aereo. Volano. Un gio¬ 
co in alta risoluzione per due sfidanti. Illu¬ 
stratore. Un programma di grafica che of¬ 
fre la possibilità di realizzare ottimi disegni an¬ 
che a chi non è molto dotato. Autoschermo. 
Crea in automatico menù altamente 
professionali (come quelli di Appleworks) da 
inserire nei vostri programmi. Lire 30.000. 

AP15/A32 Computer cuisine. Un ricetta¬ 
rio computerizzato sul quale memorizzare in¬ 
gredienti e ricette a centinaià. Con possibilità 
di stampa delle singole ricette e con un menù 
completo dei migliori piatti creati da Gualtiero 
Marchesi, il più famoso cuoco d'Italia. Occorre 
scheda 80 colonne. Lire 20.000. 

AP15/T33 Euclide. Il massimo comune diviso¬ 


re e il minimo comune multiplo in un programma 
che ne permette l'immediata comprensione. Iso¬ 
meri. Fa parte del più ampio progetto ameri¬ 
cano Seraphim, per lo studio della chimica. Lire 
20 . 000 . 


APPLICANDO 16 

API 6/N34 Dieta personalizzata. Un pra¬ 
tico sistema di data base nutrizionale, con il 
quale è possibile personalizzare, a seconda del¬ 
la propria costituzione fisica e delle abitudini a- 
limentari, una dieta bilanciata, a lungo o a bre¬ 
ve termine. Il dischetto contiene un file dati di 
400 cibi, la cui composizione è analizzata in ca¬ 
lorie, proteine, grassi, vitamine e colesterolo. 
Lire 30.000. 

/ T 7 ^ 

Dieta API 6/N34 

Un pratico sistema di 
data base nutrizionale 
con il quale avrete la 
possibilità di personalizzare 
una dieta bilanciata 
V ___/ 

AP16/N35 Designer. Il concetto dei potenti 
e costosi programmi di CAD/CAM alla porta¬ 
ta dell'Apple//, per fare del computer uno 
strumento semiprofessionale per disegnare. Il 
gioco dei pompieri. E’ scoppiato un incen¬ 
dio, e voi siete un pompiere che deve salvare il 
maagior numero di persone prima che muoiano 
soffocate tra le fiamme. Per listare bene 
in vista. Se nel programmare avete preferi¬ 
to la compattezza alla chiarezza, avete bisogno 
di questo programma. Timer. Un fedele e 
preciso contasecondi che avverte del passare 
del tempo, e al momento giusto... Lire 30.000. 

API 6/N36 Cento One-liner. Utilities, rou- 
tines, dimostrativi di grafica e di suoni, e perfi¬ 
no giochi. Cento programmi su un solo dischet¬ 
to, tutti rigorosamente scritti in una sola linea 
di Basic. Da usare così come sono, da studiare 
come esempi di sintesi, o da trasferire nei vo¬ 
stri programmi. Ure 30.000. 

API 6/N37 Rubrica telefonica (occorre 
Appleworks). Un'agenda telefonica che indivi¬ 
dua in tempo reale qualunque numero memoriz¬ 
zato, che stampa le etichette per spedire gli 
auguri, e stampa elenchi su carta da distribui¬ 
re aggiornati ogni mese ai collaboratori. Lire 
15.000. 


APPLICANDO 17 

AP17/N38 Strade d'America. Pianifica 
un qualunque itinerario stradale americano tra 
ben 171 città diverse, fornendo le sigle delle 
strade da percorrere, l'elenco delle città inter¬ 
medie e i calcoli della distanza in miglia dei 
tratti intermedi e totali. Uragano. Su una pic¬ 
cola città indifesa una tempesta si abbatte im¬ 
placabile: distruggerà tutto. A meno che... Gio¬ 
co ad altissima risoluzione grafica. Lire 
30.000. 

API 7/N39 Regress. Ideale per manipolare 
dati con funzioni statistiche, con la possibilità 
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di chiedere previsioni in base all'andamento del¬ 
la regressione sui dati inseriti. Calcolatrice 
RPN. Con questo programma l’Apple diventa 
una sofisticata calcolatrice che impiega per l'in¬ 
put la notazione polacca inversa, con una cata¬ 
sta operativa di quattro registri. Sparate a 
vista. Siete appostati contro un muro e co¬ 
mandate un potente cannone. Dal cielo fluttua¬ 
no oggetti che dovete colpire. Ma un avversa¬ 
rio con un altro cannone... Lire 30.000. 

API 7/A40 I conti del negozio (occorre 
Appleworks). Questo modello di spreadsheet 
è utilissimo per seguire l'andamento giornalie¬ 
ro e mensile di un negozio. Per ogni movimento 
dì cassa è possibile memorizzare causale e tipo 
di pagamento. Il computer calcola i totali per o- 
gm voce e indica qual è stato il movimento di 
cassa della giornata, tenendo conto degli ordi¬ 
ni e dei saldi per impegni precedenti, elabora i 
dati suddivisi per categoria merceologiche e 
calcola le percentuali di ripartizione degli utili 
su ogni articolo. Lire 50.000. 

AP17/A41 I conti del negozio (occorre 
Visicalc). Come API 7/A40, ma con Visicalc. Li¬ 
re 50.000. 


APPLICANDO 18 

AP18/N41 Trivia. Una versione per Apple II, 
del gioco Trivial Pursuit, però personalizzabile 
e quindi utile anche per studiare o ripassare. 
Bioritmi. Con questo programma si può se¬ 
guire l'andamento dei propri bioritmi: tutti e 
tre i cicli, mese per mese. Occhio ai consu¬ 
mi. Invece di annotare diligentemente la per¬ 
correnza in chilometri e i litri di carburante 
consumato e poi fare i relativi calcoli... Lire 
30.000. 

AP18/N42 Regolatore del bip. Un 

programma per regolare a piacimento il volume 
del beep dell'Apple Ile. Comparatore di 
grafici. Ecco come comparare le curve 
disegnate da funzioni diverse. Impaginato¬ 
re di messaggi. Scritte perfettamente 
centrate sia sul video che sulla stampante, 
senza fatica. Utility per ProDOS. Pre- 
fix, Subdirectory, Pathname? Sono termini 
che bisogna conoscere per programmare in 
ProDOS. Questa utility aiuterà a capire e im¬ 
parare con facilità. Lire 30.000. 


APPLICANDO 19 

AP19/N43 Oracolo. Comperare una casa? 
Cambiare lavoro? Concludere o no quell'affa¬ 
re? Il primo programma di tipo decision maker 
disponibile in Italia. Digger. A differenza dei 
giochi di labirinto di tipo tradizionale, Digger 
chiede di risolvere dei rompicapo spaziali, e la 
prontezza di riflessi non è tra i fattori del gio¬ 
co... Claustrofobia. Questo gioco in alta ri¬ 
soluzione, pacifista nei risultati, ma non nei me¬ 
todi, mette alla prova l'abilità del giocatore. 
Ma attenzione che non vi incastrino, perché sof¬ 
frite di claustrofobia... Gestione puntato¬ 
ri. Volete caricare in memoria un programma 
in Applesoft al di sopra di questo o quel codi¬ 
ce in linguaggio macchina? Magari aggirando la 
memoria di schermo in alta risoluzione? O addi¬ 
rittura in cima a un codice ormai servito al suo 
scopo in un programma che sta girando? O an¬ 
nullare un FP battuto per errore? Con questo 
programma, tutto è possibile. Grafica in 
doppia risoluzione. Tre routine in Basic e 


una in Assembler che vi pernotteranno di crea¬ 
re prorammi in doppia alta risoluzione con 16 
colori. Sei soluzioni. Il programma, propo¬ 
sto nell'ambito del Progetto Seraphim, è un te¬ 
st che consiste nel presentare allo studente 
quantità limitate di un certo numero di soluzio¬ 
ni in provette numerate. Lo studente conosce 
le sostanze presenti e deve, usando esclusiva- 
mente le soluzioni a disposizione, identificare il 
contenuto di ciascuna provetta. Ure 30.000. 


APPLICANDO 20 

AP20/N44 Salute. Vaccinazioni, malattie, a- 
nalisi, terapie e soprattutto costi a non finire. 
Come ricordare tutto, registrare e listare le 
spese mediche di tutti i familiari? E al momen¬ 
to di pagare le tasse... Variabili. Con questa 
utility in Applesoft potrete visualizzare i 
valori delle variabili per un'efficace individua¬ 
zione degli errori di un programma. Grafica. 
Che cosa sono le figure a blocco? Perché è im¬ 
portante farne la conoscenza? Per chi possie¬ 
de l'Apple Ile o il Ile con scheda 80 colonne 
continua l'entusiasmante viaggio nel mondo del¬ 
l'altissima risoluzione. Simulazione di un e- 
quilibrio. Un software didattico del 
progetto Seraphim che crea la simulazione al 
computer di un problema di equilibrio. Lire 
30.000. 

AP20/N45 Oroscopo. Scientificamente fon¬ 
dato, permette la creazione di una carta del 
cielo natale che nulla invidia ai grafici tracciati 
dai professionisti. E le tabelle con latitudini, 
longitudini, fusi orari eccetera? Ci sono, ci so¬ 
no... Voce. Ora non gli manca più la parola: con 
questa routine in linguaggio macchina Apple// 
può finalmente pronunciare tutto quello che vo¬ 
lete. L.30.000. 


APPLICANDO 21 

AP21/N46 Architetto. Un programma per 
studiare sul video la disposizione di mobili, por¬ 
te, finestre e muri, spostandoli a piacere, mo¬ 
dificandone le dimensioni, duplicandoli, facendo¬ 
li ruotare.. E poi, naturalmente, stampando il 
tutto. Autocorsa. A tutta birra lungo una pi¬ 
sta con vere e proprie voragini e massi da schi¬ 
vare. A ogni videata cambia la difficoltà del 
percorso, e la sosta ai box riserva qualche inte¬ 
ressante sorpresa By-pass per il dump. 
Una scorciatoia per accedere alla routine di 
stampa, e solo a quella, senza bisogno di attra¬ 
versare prima tutto il programma: basta 
by-passarlo! Cursore. Per lo spostamento 
del cursore Apple// usa gli ingombranti coman¬ 
di HTAB e VTAB; è invece possibile utilizzare 
speciali caratteri di controllo nelle stringhe 
stampate, grazie a questo programma in codi¬ 
ce macchina. Grafica. Un altro passo avanti 
verso la perfetta padronanza della grafica in 
altissima risoluzione: come animare sullo scher¬ 
mo le figure a blocchi e come dare l'impressio¬ 
ne che scorrano dietro un altro oggetto. Cur¬ 
ve di titolazione. Interessa gli studenti (e 


gli insegnanti) di chimica questo programma 
del Progetto Seraphim: inserite le debite va¬ 
riabili, e assegnato il nome all'acido che si sta 
studiando, traccia sul piano cartesiano la relati¬ 
va curva di titolazione. Lire 30.000. 


APPLICANDO 22 

AP22/N47 Impegni. Polizze che scadono, 
appuntamenti, anniversari e compleanni. Per a- 
vere sempre sotto gli occhi un promemoria elet¬ 
tronico, ecco un calendario intelligente. Az¬ 
zardo. Il computer diventa mazziere di Bla- 
ckjack, in una simulazione che ricalca fedelmen¬ 
te il funzionamento delle slot machine di Las Ve¬ 
gas. Effetti speciali. L'importanza di una 
gradevole presentazione non va sottovalutata, 
quando si realizza un programma. Consente lo 
scorrimento orizzontale di una stringa, alla 
velocità voluta, per vivacizzare un menù, un tito¬ 
lo, oppure... Calendario. Ecco un calendario 
perpetuo, perfetto, veloce e sempre pronto. 
Grafica. Creare intere immagini e figure a 
blocco sullo schermo Hi-Res, e poi animarle. 
Chimica. Il famoso numero di Avogadro e il 
concetto quantitativo di mole: la visualizzazio¬ 
ne aiuta a spiegarli e ad apprenderli meglio. Li¬ 
re 30.000. 


APPLICANDO 23 

AP23/N48 Obelisk. Un game spaziale, alla 
caccia di obelischi da distruggere, con singoli 
colpi o con una megaesplosione. Programma¬ 
re l'Applemouse. Come programmare sul¬ 
l'Apple in modo da utilizzare il mouse? In Apple¬ 
soft o in Assembler, ecco un aiuto prezioso per 
la programmazione e l'utilizzo dell'Applemou- 
se. Più che diapositive. Per realizzare 
presentazioni con il computer che siano qualco¬ 
sa di più di un continuo scorrere di diapositive: 
l'effetto “solid state”! Grafica Programma 
dedicato alla doppia alta risoluzione: scorrimen¬ 
to orizzontale di scritte e figure. Ure 30.000. 

AP23/A49 Trasferimento da Apple a 
Mac. Un programma eccezionale e nuovissimo: 
trasferire testi dall’Apple Ile e Ile al Macinto¬ 
sh è ora possibile e, quel che più conta, sempli¬ 
ce e ultrasicuro. La confezione comprende un 
dischetto da 3 pollici e mezzo e uno da 5 pollici 
e un quarto. Lire 50.000. 

AP23/N50 Grafici 3D. Un programma che 
consente la realizzazione di grafici a tre dimen¬ 
sioni senza linee nascoste. Quale elemento? 
Un trivia di chimica, per ripassare giocando i 
nomi e le caratteristiche di tutti gli elementi 
della tavola chimica. Le domande le fa lo stu¬ 
dente, e dalle risposte del computer deve rica¬ 
vare la soluzione finale. Lire 20.000. 


APPLICANDO 24 

AP24/N51 Executive Card File. Uno 
schedario eccezionale per Apple II. E' 


Utility DOS 3.3 - AP24/A55 

Il sistema operativo ormai non più fornito dalla Apple, 
indispensabile per copiare alcuni programmi 
di Applicando. Nello stesso dischetto sono 
comprese 4 utility per la gestione dei file DOS. 
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strutturato in modo che le schede possano 
essere riposte in dieci racco* glitori: un' 
infinità di dati con la massima velocità di 
reperimento. Apple Maestro. Tutti 
compositori, con questo programma che 
insegna a creare musica in modo professionale, 
ma non per questo inaccessibile ai profani. Lire 
35.000. 


Il dominio di Meandro - AP26/A65 

Un adventure game tutto italiano migliore perfino, dei più 
famosi adventure d’importazione. Alla ricerca del grande 
segreto, nascosto oltre lo specchio e dentro la fantasia. 

v ____ J 


AP24/N52 Dump 80 colonne. Un 
programma per ottenere la stampa della 

pagina schermo a ottanta colonne: proprio 
quello che finora non avreste potuto chiedere 
al vostro Apple. Date and time. Senza più 
dover ricorrere a costose schede aggiuntive, 
potete inserire nel vostro computer un 
calendario e, soprattutto, un orologio. 

Grafica. Con raggiunta delle routine per lo 
scorrimento verticale il mondo della grafica in 
doppia alta risoluzione non ha più difficoltà né 
segreti. Lire 30.000. 

AP24/N53 Prospettiva 3D. Questo pro¬ 

gramma è il seguito naturale di quello 
contenuto nel disco AP23/N50: come 

disegnare intere prospettive urbane, senza 
che il computer mostri i lati e le facce che 
devono rimanere nascosti. Test scolastici. 
Come crearsi un trivia "aperto", cioè non 
confinato a una sola materia e aperto a ogni 
intervento. Un modo nuovo e intelligente per 
ripassare (o giocare) interrogandosi. Lire 
20 . 000 . 

AP24/A55 Utility Dos 3.3. Questo di¬ 
schetto consente a tutti coloro che hanno 
acquistato un Apple// dopo il maggio 1984 di 
avere a disposizione il sistema operativo Dos 
3.3 indispensabile per ricopiare alcuni pro¬ 
grammi presentati da Applicando. Insieme al 
sistema operativo vengono fornite quattro 
interessanti utility per la gestione dei file Dos. 
Il dischetto contiene tutte le informazioni 
necessarie. Lire 25.000. 


APPLICANDO 25 

AP25/N56 Chart Manager. Un programma 
professionale per la gestione dei dati, azienda¬ 
li o familiari: ordina, calcola, modifica e poi trac¬ 
cia il grafico prescelto, a curve, a barre o a tor¬ 
ta. In ogni sua fase consente il dump grafico 
dello schermo. Grafica. Quale logica è prepo¬ 
sta all’alta risoluzione nell’Apple? Queste routi¬ 
ne in linguaggio macchina consentono un buon 
approccio al problema attraverso la gestione 
delie figure a blocchi. Lire 35.000. 

AP25/N57 Apple Checker. Un vero amico 
per chi copia da sé i programmi: controlla se 
sono stati commessi errori di battitura. Buf¬ 
fer di stampa. Spooler è un programma 
che utilizza la scheda language card nell'Apple 
64 per "parcheggiare" i dati; così mentre 
stampate potete continuare a lavorare sullo 
schermo del computer. Cinetica. Un interes¬ 
sante esperimento di laboratono: analizzate la 
variazione di velocità in funzione delle concen¬ 
trazioni dei reattivi e della temperatura. L. 
35.000. 


APPLICANDO 26 

AP26/N59 Ants. Un gioco ai confini della real¬ 
tà, terrificante e divertente: gigantesche, 
spuntano dal vostro giardino delle omicide for¬ 
miche mutanti. File name mover. All’inizio 


l'Hello sta scritto al primo posto nel Catalog, 
ma poi si sposta... Per fare un po' di ordine nei 
nomi dei file questa utility è indispensabile. Si¬ 
stemi di equazioni lineari. Molti sono 
quasi impossibili da risolvere senza computer, 
per la loro interminabile complessità. Questo 
programma può affrontare fino a 70 equazio¬ 
ni, con fino a 70 variabili. E naturalmente 
stamparie. Lire 35.000. 

AP26/A60 Irpef (occorre VisiCalc). Il tem¬ 
po delle tasse, oltre ai noti dolori, comporta 
perdite di tempo e disguidi: per compilare più 
in fretta la dichiarazione, e tenersi aggiornati 
con le aliquote in corso, questo modello sfrutta 
la potenza del foglio elettronico. Lire25.000. 

AP26/A61 Irpef (occorre Apple Works). Lo 
stesso del precedente, ma in versione 
AppleWoiks. Ure 25.000. 

AP26/N64 Certificatore di dischetti. 
Aprire una seconda tacca nel dischetto per 
sfruttare anche la memoria della faccia poste¬ 
riore? Con questo programma lo si può fare 
senza timori: controlla tutte le tracce e segna 
come già utilizzati i settori eventualmente di¬ 
fettosi. Grafica. L'animazione di figure a 
blocchi si può gestire in più modi; ecco alcune 
routine chiave, interdipendenti. Ure 25.000. 

AP26/A65 II dominio di Meandro. Final¬ 
mente un adventure tutto italiano, che però 
non ha nulla da invidiare ai professionali d’im¬ 
portazione. Alla ricerca del Grande Segreto, 
nascosto oltre lo specchio e dentro la fantasia. 
Ure 35.000. 


APPLICANDO 27 

AP27/N66 Chitarra. Un maestro ti insegna 
gli accordi, mostrando sul video in bassa risolu¬ 
zione chiarissime istruzioni grafiche per la di¬ 
teggiatura; una speciale routine, poi, controlla 
gli errori commessi. Crono. Relegato nel Tar¬ 
taro all'inizio dei tempi da Zeus, Crono ne emer¬ 
ge oggi e sferra un attacco mortale per il pote¬ 
re universale... Armati del fulmine divino, dove¬ 
te sconfiggerlo. Ure 35.000. 

AP27/N67 Reminder. Per tenere sotto con¬ 
trollo la gestione domestica, ecco un program¬ 
ma multiforme: è un gestore prestiti, un custo¬ 
de delle scorte freeezer, un programmatore 
per l’orto, un'agenda delle incombenze e dei la¬ 
vori... Grafica Tutte le immagini grafiche, 
provenienti da qualsiasi programma, possono 
divenire tavole di figure a blocco. Con questo 


programma, poi, non occorre nemmeno cono¬ 
scerne le coordinate. Postmaster. Può esti- 
re cento indirizzi, ordinarli in ordine alfabetico 
e modificarli quando serve, ma soprattutto è 
un formidabile stampaetichette, per ogni stam¬ 
pante. Appletrig. Seno e coseno, tangente e 
cotangente, secante e cosecante: tutte le fun¬ 
zioni trigonometriche a portata di mano. Lire 
35.000. 


APPLICANDO 28 

AP28/N74 Supershopper. Un programma 
versatile e intelligente che pianifica gli acqui¬ 
sti per una gestione ottimale, senza sprechi né 
amare sorprese, del frigorifero e delle scorte 
freezer. Planetario. La volta celeste sullo 
schermo, con i movimenti e le magnitudini delle 
stelle, in una perfetta simulazione: basta impo¬ 
stare l'ora e le coordinate del luogo da cui si 
vuole osservare la notte. Lire 35.000. 

AP28/N75 Millenote. Una routine per la 
creazione di musica, completa di staccato, co¬ 
rone, ritardi e pause, per personalizzare giochi 
e programmi con simpatici effetti sonori. Sca¬ 
tola nera. Un classico gioco di deduzione nel¬ 
l'era atomica: dal grado di riflessione del rag¬ 
gio lanciato dentro la scatola bisogna indovina¬ 
re le posizioni degli atomi contenuti. Text fi¬ 
le. Ottima routine per la gestione dei listati co¬ 
me file di testo; rende più velxj e agevoli le 
correzioni. Grafica. L'animazione delle figure 
a blocco con effetti speciali. Lire 35.000. 

AP28/A76 Gin. E' il gioco del momento, e ha 
un solo difetto: calcolare il punteggio è laborio¬ 
sissimo. Nessun problema, però, se si usa que¬ 
sto programma contapunti. Lire 20.000. 


APPLICANDO 29 

AP29/N79 Movie construction set. Rea¬ 
lizzare veri e propri cartoni animati, e guardar¬ 
li poi scorrere sul video è possibile, con questo 
programma ricco, ma semplice da usare. Win- 
dow magic. Come su Macintosh, i menù del II 
si possono gestire con finestre e icone. Grafi¬ 
ca. Lo schermo si anima di effetti magici: lo 
scorrimento animato diventa realtà. L. 35.000. 

AP29/N80 Special Utilities. Due utility, in 
accoppiata vincente: Supercharger e Crunch- 
Decrunch. La prima comprime in memoria le im¬ 
magini in Hi-Res, la seconda estende il po¬ 
tenziale dell'Applesoft in DOS 3.3. L. 35.000. 


Investor AP5/N08 

in tempo reale il quadro esatto di come vanno i propri 
investimenti fihanziari. Con cinque prospetti riepilogativi 
e 52 periodi di quotazione, Investor è uno dei programmi 
più completi in questo settore e in assoluto il più economico. 
Nuova versione con analisi grafica potenziata. Lire 70.000. 

\___ J 
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AP23/A49 Trasferimento da Apple a 
Mac. Un programma eccezionale e nuovissimo: 
trasferire testi dall'Apple Ile e Ile al Macinto¬ 
sh è ora possibile e, quel che più conta, sempli¬ 
ce e ultrasicuro. La confezione comprende un 
dischetto da 3 pollici e mezzo e uno da 5 pollici 
e un quarto. Lire 50.000. 

AP24/N54 MacGraph. Un programma 
favoloso per un uso professionale del 
Macintosh: può creare ogni tipo di grafico, a 
linee, a barre o a torta, che poi si può copiare e 
incollare in qualunque altro documento 
(relazioni, documenti da proiettare...). Lire 
40.000. 

f ~\ 

MacGraph 

AP24/N54 

Un programma altamente 
professionale per creare 
ogni tipo di grafico, a linee, 
a barre o a torta, che poi si 
può copiare e incollare in 
qualunque altro documento 

L _ J 

AP25/N58 File Cabinet. Potenza e versati¬ 
lità caratterizzano il database per Macintosh: 
strutturato come uno schedario, permette 
un'archiviazione e una gestione dati molto agile 
e intelligente. I criteri di classificazione, multi¬ 
pli,consentonolamassimapersonalizzazione. Li¬ 
re 40.000. 

AP26/A62 Bioritmi. Un programma brioso, 
ma professionale nell'impostazione e nella grafi¬ 
ca. Allietato dal disegno dei sìmboli zodiacali, 
traccia le tre famose curve fisico-emotivo-in- 
tellettive mese per mese, fa i confronti e dà il 
consiglio del giorno. Lire 40.000. 

AP26/A63 Irpef (occorre Multiplan). Il tem¬ 
po delle tasse, oltre ai noti dolori, comporta 
perdite di tempo e disguidi: per compilare più 
in fretta la dichiarazione, e tenersi aggiornati 
con le aliquote in corso, questo modello sfrutta 
la potenza del foglio elettronico. Lire 25.000. 

AP27/A68 Leasing (occorre Multiplan). 
Conti alla mano, qual è il tasso reale che vi toc¬ 
ca pagare? La convenienza di ogni contratto di 
leasing conteggiata su misura grazie a una ap- 


FreeSoftware 
per Macintosh 

I seguenti dischetti sono disponibili a lire 
30.000 se ordinati uno per volta. A lire 
75.000 per cinque dischetti (praticamen¬ 
te 15.000 l'uno). E a lire 120.000 per tut¬ 
ti e dodici (praticamente 10.000 lire l'u¬ 
no). Questi prezzi si intendono Iva e spe¬ 
dizione comprese. Utilizzare il tagliando 
del DiskService, specificando il numero 
di codice. 

APFS/A01. 22 programmi e documenti 
fra cui lo stampa cataloghi DiskCat, il 
programma di comunicazioni FreeTerm 
1.8, gli accessori-mela 20DAs e Other... 
1.6b, l’impacchettatore di programmi Pa- 
cklt il, il gioco del bigliardo Billiard Par- 
lour, e, utilissimi per chi usa l'hard disk, 
HFS Open e HFS Search. Inoltre: MA- 
CWAIT, Binhex 5.0, ChangeApp, Wa- 
yStation1.9b, WATOR, Pong, Curve, 
Munch, Fractals, Aquarium. 

APFS/A02. 19 programmi e documenti 
fra cui il programma di comunicazioni 
Red Ryder 9.0 e l'installatore di tasti di 
funzione FKEY completo di documenta¬ 
zione. Inoltre Maze 3D e Tree. 

APFS/A03. 22 programmi e documenti 
fra cui il generatore di icone Iconmaker, 
le Utilities Fedit 3.05, MWRecover, Mac- 
Write Rescuer 1.2, Fatdiskmaker, Dra- 
wpaint 1.0, MacRepair e READWRIT, e 
il codificatore-decodificatore di file Con- 
Code. Inoltre: DAs SetSound&StuffClip, 
DAFILE, 2.0 macsampler, StrinqArt, 
Snow, Julia, Orion vl.0, Bin/Graphics, 
Munch, PepsiCaps, PRAM. 

APFS/AQ4. 35 programmi e documenti 
fra cui il celebre psicoanalizzatore Eli- 
za, il programma per imparare e ripassa¬ 
re Flashcard, il programma per insegna¬ 
re Drill 1.52. Inoltre: MakePaint vi .1, Sli¬ 
de Show, SelectPaint, Spline Demo, 
Rays, StarMap, Stars, Pascal Runtime, 
Composers. 

APFS/A05. 14 programmi e documenti. 
In particolare giochi come Space War!, 
Wave 15, Invaders, Juggler. Inoltre: Da- 
taFlow, Worm Stat, Engel's Enigma. 

APFS/A06. Occorre FileVision. 32 do¬ 
cumenti di FileVision esplicativi delle più 
diverse applicazioni del programma. 

APFS/A07. Occorre Excel-Multiplan. 
32 documenti di Excel (e Multiplan), 
esplicativi delle più diverse applicazioni 
dei due programmi. 

APFS/A08. 10 programmi e documenti 
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fra cui i giochi Reversi, Hangman, e 
MouseBall. Inoltre: Concentration e 
Smooth Voice. 

APFS/A09. 31 programmi e documenti 
contenenti soprattutto caratteri (Fonts): 
Bubbles 14, 24, Hollywood Thin 24, Ran- 
gers 18, Lineai 18, Music Fonts, Raven¬ 
na 12, 24, newer keykaps, Font Display, 
FontDisplay.doc, Andover, About Icon, 
Icon, Taliesin, Music2, Thin, Small¬ 
ai 0/18/20, Floor Plan-9/24, Paint 18, 
Toyland 1/2 - 36, Toyland 1, 2, Demo¬ 
graphics 36, Music, States, Calligraphy 
12, 24, 18, 36, Candy 12, Centura, Far¬ 
go 48, Houston 36, Ultra 24, Cava- 
naugh 18,36, Symbol-12. 

APFS/A10. 25 programmi e documenti 
contenenti soprattutto caratteri 

(Fonts): Salamis, Sparta, Old Church 
Slavonic, Greek.D, Moscow-24, Austin 
Math Font Docs, newer keykaps, Fon- 
tDisplay, Babylon 9, 18, Nordic 9, 12, 18, 
Troyes 10, 12, 20, 24, Script Math, De- 
mographics-36, Erie 12, 24, FontDi¬ 
splay.doc, Wartburg, German Script 
Font notes, Stuttgart 12, 24, Palo Alto 
12, 24, Nordic 12, 9, 18 24, Washington 
9, 12, 18, 24, Copenhagen 9, 12, 18, 24, 
Camelot 12, 24, ChicMath, Austin math 
font. 

APFS/A11. 33 programmi e documenti 
contenenti soprattutto caratteri (Fonts) 
e strumenti per lavorare sui caratteri: 
Geneva-12, Geneva-24, Princeton-12, 
Princeton-24, new key caps, Read Me, 
Princeton2.1/24, Princeton2.1/12, Read 
Me 2, Read Me 3, Long lsland-12, Long 
lsland-18, Stuttgart-12, Camelot-12, Stut- 
tgart-24, East Orange-12, Square Serif- 
24, Camelot-24, Broadway-24, Font Li- 
ster, Font Editor, Resource Mover, 
Font Mover, Contents, Part 1, Pari 2, 
Pari 3, Part 4, Part 5, Part 6, Part 7, 
Font Doubler, Set File Attributes. 

APFS/A12. 12 programmi e documenti 
fra cui il coniugatore di verbi francesi 
Le Conjugueur, il programma di auto¬ 
stampa Yapun 3.0, il compattatore di fi¬ 
le Compact, e il copiatore Copybits. Inol¬ 
tre: Curves, Simutree, Smile, Meltdown, 
Antitheft Icon, Venn, Card bic, Very 
New Fonts. 

APFS/A13. Per ordinare 5 dischetti al 
prezzo speciale di 75.000 lire, indicare 
nel buono d'ordine di pag. 130 questa si¬ 
gla, seguita dalle sigle dei 5 dischetti 
desiderati. 

APFS/A14. Per ordinare tutti i 12 
dischetti al prezzo speciale di 120.000 
lire, basta indicare nel buono d'ordine di 
pag. 130 questa sigla. 


Nuova opportunità 
per i nostri 
lettori 



Abbonamento 
DISK SERVICE 


Applicando è lieto di offrire ai propri lettori la 
possibilità di sottoscrivere un abbonamento 
a 5 o 10 dischetti, a scelta fra quelli presentati nel 
Disk Service, a un prezzo super vantaggioso: 

120.000 lire per 5 dischetti Apple II 
200.000 lire per 10 dischetti Apple II 
175.000 lire per 5 dischetti Macintosh 
300.000 lire per 10 dischetti Macintosh 

Pagherete, rispettivamente, 24.000, 20.000, 35.000 
o 30.000 lire a dischetto, Iva e spese di spedizione 
comprese 

qualunque sia il prezzo di vendita 
del singolo dischetto. 

Basta che compiliate il tagliando qui sotto e lo 
inviate ad Applicando, abbonamenti Disk Service, 
Corso Monforte 39, 20122 Milano, unitamente a un 
assegno non trasferibile intestato a Editronica srl 
e al vostro primo ordine. 

Per ordinare i dischetti, adesso e in seguito 
utilizzate il buono d'ordine pubblicato alle pagine 
seguenti, specificando sempre che siete un 
abbonato del Disk Service. L'abbonamento non ha 
scadenza, quindi i 5 o 10 dischetti potete ordinarli 
quando più vi aggrada. 



Sì, desidero sottoscrivere il seguente 
abbonamento al Disk Service: 

□ 5 dischetti con programmi Apple II, per 120.000 lire 

CU 10 dischetti con programmi Apple II, per 200.000 lire 
CU 5 dischetti con programmi Macintosh, per 175.000 lire 
CC 10 dischetti con programmi Macintosh, per 300.000 lire 

Nome_ 

Cognome_ 

Indirizzo_ 

Cap- Città-PV- 


Data 


Firma 


































éMsservice 


segue: Programmi per Macintosh 

plicazione di matematica finanziaria sofistica¬ 
ta, ma semplice da usare. Lire 30.000. 

AP27/N69 MacBanker. Un programma real¬ 
mente all’avanguardia, che consente la stampa 
degli assegni su modulo continuo. Ma non solo: 
tutta la gestione del vostro conto in banca, con 
verifica puntuale degli estratti conto che vi 
vengono inviati, con registrazione accurata di o- 
gni vostro versamento e di ogni assegno che e- 
mettete, è affidata a MacBanker. Lire 
40.000. 

AP28/N77. Cronometro. Un prezioso acces¬ 
sorio da aggiungere alla scrivania del Macinto¬ 
sh: tiene conto dei sessantesimi di secondo e 
stampa i nomi dei parziali. Radion Tyrant. 
Un avvincente gioco di strategia nella reggia 
del tiranno, alla ricerca delle sue guardie. Con 
griglia di gioco e griglia di controllo. Lire 
40.000. 

AP28/A78 Gin; Chi ama le carte non può non 
conoscere Gin, il gioco del momento; che ha un 
solo difetto: calcolare il punteggio è laboriosis¬ 
simo. Nessun problema, però, se si usa questo 
programma contapunti. Lire 25.000. 

AP29/N82 Maclnvestor. Un programma 
senza uguali per la gestione del portafoglio ti¬ 
toli: permette un'agevole introduzione e modifi¬ 
ca dei dati, la memorizzazione dei movimenti e la 
resa grafica dei resoconti. E’ uno dei program¬ 
mi piu completi del settore e in assoluto il più 
economico. Lire 80.000. 

AP29/N83 I Ching. Un metodo di previsione 
del futuro che riassume in sé la saggezza degli 
antichi cinesi: risale a tremila anni fa. Questa 
versione elettronica è la prima che ne conserva 
tutta la complessità. Lire 35.000. 


Maclnvestor 

AP29/N82 

Il programma senza uguali 
per la gestione del portafoglio 
titoli, che è in assoluto il più 
economico del settore 


Applicazioni Omnis3 pronte per l'uso 

Applicando mette a disposizione dei lettori una serie di applicazioni già pronte, 
preparate con OMNIS3, che toccano i più svariati campi. Saranno tutte offerte a 
basso prezzo, e funzioneranno con il RUNTIME di Omnis3, che acquistato una vol¬ 
ta può essere poi usato anche con più di una applicazione. Ovviamente chi pos¬ 
siede il programma Omnis3 potrà fare a meno di acquistare il RUNTIME, che può 
essere richiesto ai migliori computer shop o direttamente a Editronica insieme alle 
applicazioni, utilizzando il tagliando del Disk Service. 

Queste applicazioni e il RUNTIME non possono essere ordinati 
usufruendo delTabbonamento al Disk Service. 

FATTURAZIONE E MAGAZZINO - AP27/A70 

Per chi ha l'esigenza di dover stampare molte fatture, magari ripetitivamente, an¬ 
dando a pescare i dati del venduto da un magazzino e quelli identificatori del 
cliente da un archivio. La procedura permette la personalizzazione della stampa 
delle fatture. Funziona sia su Macintosh 512K sia con Macintosh Plus, con doppio 
drive e stampante ImageWriter. Lire 272.500 Iva 9% e spese di spedizione 
comprese. 

PREVENTIVAZIONE - AP27/A71 

Studiata per una gestione del magazzino molto ampia e complessa, questa 
applicazione può gestire il carico e lo scarico automatico dal magazzino, il control¬ 
lo delle merci a stock, l'inventario di magazzino con la relativa movimentazione, le 
chiusure periodiche e annuali di tali movimenti, la gestione dell'elenco Clienti e For¬ 
nitori, e (a gestione di preventivi e di commesse di vendita o acquisto. E' molto 
complessa ma estremamente facile da usare grazie anche a una serie di indicazio¬ 
ni a video. Può funzionare sia con il Mac da 512K che con il Plus, con ImageWri¬ 
ter, ma si consiglia l'uso di un Hard-Disk o di drive da 800K per la registrazione. Li¬ 
re 272.500 Iva 9% e spese di spedizione comprese. 

GESTIONE APPUNTAMENTI - AP27/A72 

Per automatizzare e gestire in maniera efficace gli impegni lavorativi nell’arco 
della giornata. Gli appuntamenti vengono suddivisi per Clienti, Fornitori, Meeting 
interni all'ufficio e impegni personali. E' possibile effettuare ricerche di appunta¬ 
menti nell'arco di un giorno, ai una settimana, di un mese. E' un ottimo complemento 
alle due procedure precedentemente descritte. Funziona con Mac 512K o Plus 
con doppio drive e ImageWriter. Lire 163.500 Iva 9% e spese di spedizione 
comprese. 

GESTIONE CONTABILITA’ DOMESTICA - AP29/A81 

Per avere sempre sotto controllo l'andamento delle entrate e delle uscite tipiche 
di una contabilità domestica. A mano a mano che si caricano i i movimenti, 
vengono automaticamente aggiornati i totali Entrate, Uscite e Saldo; di 
quest'ultimo è possibile la stampa dettagliata. Lire 119.900 Iva 9% e spese di 
spedizione comprese. 

RUNTIME OMNIS3 - AP27/A73 

Serve a utilizzare, tutte le applicazioni create con Omnis3. Lire 381.500 Iva 9% 
e spese di spedizioni comprezse 


Compilare e spedire il tagliando qui sotto a Applicando , Editronica srl, Corso Monforte 39, 20122 Milano 
Vogliate inviarmi i seguenti dischetti 

' Cognome.Nome. 

Via......CAP. 

Città.Prov. 

Scelgo la seguente formula di pagamento: 

CU allego assegno di L. non trasferibile intestato a Editronica Srl. 

di allego ricevuta di versamento di L.sul cc/p n. 19740208 

intestato a Editronica srl, C.so Monforte 39, 20122 Milano. 

O pago fin d'ora l’importo di L. con la mia carta di credito 

Bankamericard N.scadenza. 

autorizzando la Banca d’America e d'Italia ad addebitarne fimporto sul mio conto. 

Data.Firma. 
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Sono abbonato al Disk Service: sì □ no □ 
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I I Desidero fattura. D mio codice fiscale/partita Iva è: 
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Abbiamo già venduto 2 milioni di 
High Precision Data Memories. 



E siamo solo agii inizi. 


High Precision che, trattandosi di un di¬ 
schetto flessibile, dice tutto. 

Precisione per HP Data Memories è il 
risultato di una tecnologia avanzatissi¬ 
ma che si avvale delle ultime novità in 
fatto di materie prime, formulazione 
magnetica, costruzione e sistemi di 
confezione. 

Non c’è da stupirsi, se pensiamo che 
questo marchio di successo ha dietro di 
sè tutta l’esperienza commerciale e tec¬ 
nologica di un’azienda come la MEE. 
HP Data Memories unisce eccezionali 


caratteristiche di chiarezza del segna¬ 
le, alta resistenza del substrato in po¬ 
liestere, lunga durata. 

I numerosissimi test cui viene sottopo¬ 
sto durante il ciclo di fabbricazione ne 
garantiscono prestazioni molto superio¬ 
ri a quelle dettate dai normali standards 
quantitativi. 

Preciso, resistente, affidabile anche 
nelle situazioni più critiche, il dischet¬ 
to HP Data Memories - 
prodotto nei formati 8”, 

5 1/4”, 3 1/2”-ècerti¬ 
ficato 100% error free 


secondo le norme ANSI, ECMA, ISO, 
JIS, IBM, SHUGART. 

Del resto che sia un prodotto di primis¬ 
sima qualità è dimostrato dalla sua in¬ 
credibile diffusione, ben 2.000.000 di 
pezzi venduti in pochissimo tempo. 
Un "dischetto d’oro” in piena regola 
che ha tutte le intenzioni di continuare 
su questa strada fino ad un prossimo 
ancora più ambizioso traguardo. 



s.p.a. -20144 MHano-Via Boni, 29 . 

t. 02/4988541-telex324426MEE-itaiia 
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Parliamone insieme. 









